5 a Fenay>ft 

OS MAIORES AVANÇOS DA INFORMÁTICA 



BRASILEIRA FORAM CONSEGUIDOS NESTA FEIRA. 



Em março de 89, 
você vai saber 
porquê a 
informática tem 
conquistado 
grandes mercados 
no Brasil. 

De 14 a 17, no 
Riocentro, Rio de 
Janeiro, a 3- 
Fenasoft apresenta 
todos os 
lançamentos e 
produtos das áreas 
de software e 
hardware de mais 
de 200 empresas, 
na maior feira de 
informática do 
Brasil. 

E a grande 
oportunidade para 
empresários 
divulgarem e 
comercializarem 
programas e 
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US 400 MILHÕES EM NEGÓCIOS REALIZADOS. 



equipamentos, num 
evento que tem 
competência 
comprovada. 

Só nas ultimas 
duas edições, a 
Fenasoft foi 
responsável por 
mais de 400 
milhões de dólares 
em negócios 
efetivamente 
realizados. 

Uma prova de 
que nenhuma 
empresa resiste a 
um bom programa 
de informática. 
Pois na era da 
competência, 
adquirir software e 
hardware é um 
grande passo para 
que projetos 
empresariais virem 
dinheiro. 
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A GERAÇÃO DO CURSOR 
NO MSX 



RENATO DA SILVA OLIVEIRA 



Alguns micros apresentam na tela um cursor piscante, cuja 
frequência do acender e apagar pode ser regulada através da alte- 
ração do conteúdo de alguma variável do sistema. Nos micros MSX 
o cursor é gerado de modo fixo, mas pode ser alterado através de 
software para piscar. 

Normalmente, o processo pelo qual o cursor é gerado nos MSX 
envolve basicamente seis variáveis do sistema: 

coordenada horizontal do cursor, 
coordenada vertical do cursor, 
rascunho para armazenar o ca- 
ractere sob o cursor, 
rascunho de 40 bytes, 
indicador de cursor "ligado" (0) 
ou "desligado" (255). 
indicador de cursor cheio ou pela 



CSRX 
CSRY 
CURSAV 

LINWRK 
CSRSW 



em &HF3DD 
em &HF3DC 
em &HFBCC 

em &HFC18 
em &HFCA9 



CSTYLE em &HFCAA 



- CARACTERE "A" NA TELA 



O cursor é gerado apenas quando a variável CSRSW contém 
zero. 

Para gerar o cursor, o caractere apontado na tela pelas variáveis 
CSRX e CSRY tem seu código copiado da VRAM para a variável 
CURSAV (lembre-se de que quando a tela está "limpa", na verdade, 
ela está repleta de caracteres nulos, de código 0). 

Aseguir, seu desenho (8 bytes) é lido da VRAM e copiado para 
a variável LINWRK. Se CSTYLE for 0, os 8 bytes são invertidos, 
se não, apenas os 4 bytes inferiores o são. 

Finalmente, os 8 bytes alterados em LINWRK são copiados para 
a posição do cursor (código 255) na tabela de caracteres da VRAM 
e código 255 é gravado na tela, exatamente na posição apontada por 
CSRX e CSRY. 

Apenas a título de ilustração, vamos supor que o caractere sobre 
o qual o cursor esté posicionado é a letra "A", na linha 10 e coluna 
15 da SCREEN 0. Se CSRSW=0 e CSTYLE=0, o processo de 
geração docursor é ilustrado pela seguinte sequência (figuras 1 a 5). 

Figura 4 - DESENHO APÓS CÓPI A E INVERSÃO EM LINWRK 
E DESENHO DO CURSOR NA VRAM 




Figura 2 - CONTEÚDO DE CURSAV 



Figura 3 - DESENHO DO "A" NA VRAM 
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Figura 5 - CURSOR NA TELA 



Coluna 15 




4 CPU 



A listagem da figura 6 foi digitada usando-se o editor de textos 
MSX WRITE. Você poderá usar qualquer outro editor que grave os 
dados cm ASCII, como o SCED (ou MED, na versão mais recente), 
o WordStar, o Deletra, etc. Cuidado se você for usar o Tass Word 
original, pois seu formato de gravação é peculiar. Existem, 
entretanto, versões adaptadas que também gravam em ASCII. 
Lembre-se ainda que os comentários não precisam ser digitados! 

Uma vez digitado o texto do programa, teremos que compilá-lo. 
Ele está escrito de modo a ser compilado diretamente pelo M80 da 
Microsoft. Entretanto, se você quiser, poderá adaplá-lo facilmente 
para uso com o Coral Simple ASM (Cocar e Mega Assembler, nas 
"versões" nacionais). Para tanto, basta numerar as linhas do 
programa, substituir a pseudo-instrução "Z80" por "ORG 
0D0O0H" e acresceniar os dois pontos (":") antes das pseudo- 
instruções "EQU". 

Para fazer a compilação com o M80, grave o programa com o 
nome "CURSOR.MAC" e comande, a partir do MSXDOS: 
A>M80 =CURSOR 
A seguir, se tudo correu bem, use o L80 com a seguinte sintaxe: 

A>L80 /p:dOOO,cursor,cursor/n/x/e 
Finalmente, use o comando BSAVE do MSXDOS TOLL's: 

A>BSAVE cursor.hex cursor.bin 
Agora, experimente comandar: 

A>dir cursor.* 
Você deverá ter em disco quatro arquivos: 
CURSOR.MAC 
CURSOR.REL 
CURSOR.HEX 
CURSOR. SIN 

Se quiser, apague os arquivos terminados em ".REL" e em 
".HEX", preservando os outros dois. 

O arquivo "CURSOR.BIN" é o programa em Linguagem de 
Máquina, para ser carregado e executado através do BASIC. 

Para fazer a compilação com o Coral Simple ASM, basta 
comandar: 

>AOU 

Para salvá-lo em disco, vá para o BASIC com o comando ">B A" 
e comande: 

BSAVE"CURSOR.BIN",&HD000,&HD080 

Agora, com o programa em L.M. já carregado na memória, 
execute-o com os comandos: 

DEFUSR=&HD000:POKE0,USR(5) 

Observe que, se tudo correu bem até aqui, o cursor deverá estar 
piscando. Experimente alterar o valor do parâmetro passado na 
função USR. Ao invés de 5, use outros valores. Esse parâmetro 
regula a frequênci do "acender" e "apagar" do cursor. Se você passar 
o parâmetro 0, o cursor voltará ao estado normal, sem piscar. 

Experimente também levar o cursor piscando para a última linha 
da tela com as teclas de setas. Não se asuste se ele parar de piscar, 
pois é isso o que deve ocorre sempre que ele estiver na última linha. 
Teste também os comandos "KEY ON" e "KEY OFF". 

Agora que já temos o progrma digitado c funcionando, vamos 
tentar entender a listagem em assembly. Antes de mais nada, tente 
acompanhar os comentários na própria listagem. 

A primeira parte do programa recebe o parâmetro passado pelo 
BASIC, testa se ele é um inteiro e o insere na variável VELOCI. A 
seguir, se o parâmetro for zero, o hook HKEYI é restabelecido com 
um RET (0C 9H), desligando assim a rotina para piscar. Se o parâ- 
metro for um inteiro diferente de 0 e entre 1 e 255, o hook HKEYI 
é apontado para a rotina INÍCIO. 

* A rotina INICIO será executada sempre que uma interrupção 
ocorrer. Inicialmente todos os registros do Z80 são salvos e 
um teste é realizado para saber se o cursor está na última linha útil 



da tela. Se estiver, a"piscadá" do cursoré desligado. Isso efeito para 
evitar complicações com a rotina de SCROLL da ROM. Sempre 
que um SCROLL for executado, se o cursor estiver piscando, pode- 
rão ocorrer efeitos estranhos no vídeo. Pode-se evitar isso de várias 
formas mas, para não tornarmos o programa muito grande, 
optamos por simplesmente desligara "piscada" quando o SCROLL 
ocorre. Note que, quando as teclas de funções são mostradas, a 
úlúma linha da tela é a vigésima terceira e a variável CNSDFG 
contém o valor &HFF. 

O trecho seguinte do programa verifica se está no momento de 
inverter o cursor ou não. Isso é feito comparando o valor de 
CONTAD com o valor de VELOCI. Se foremm iguais, a inversão 
do cursor é realizada e o valor de CONTAD é zerado. Caso 
contrário, a variável CONTAD é incrementada e a execução passa 
para a rotina de retoma. 

A rotina de inversão é muito simples, invertendo, apenas cada 
um dos bytes do desenho do cursor (código 255) na tabela de 
caracteres da VRAM. Note que o valor 2040 é a posição relativa do 
primeiro byte do cursor dentro da tabela e a variável TXTCGP 
aponta para o início da labela da VRAM. Arotina LACO é repetida 
8 vezes e 6 bastante simples. Quando ela é executada, B contém o 
valor 8 e HLáponta para o endereço da VRAM com oprimeiro byte 
do desenho do cursor. As rotinas RDVRM e WRTVRM, apesar de 
existirem no BIOS, foram refeitas e funcionam de modo análogo: 
o par HL deve apontar o endereço da VRAM e o byte lido ou 
gravado deve estar no registro A. 

Sendo assim , o LACO apenas lê cada um dos 8 bytes do desenho 
do cursor, os inverte e os grava novamente na mesma posição. 

Aos amigos ex-usuários do TRS-80, lembramos mais uma vez 
para que atentem à versatilidade do MSX! 

Se você está interessado no efeito do cursor piscando mas não 
quizse arriscar ' as "complicações" com a compilação, "línkagem" 
e binarização, basta digitar e rodar o programa em BASIC listado 
na figura 7. Ele gera a rotina em linguagem de máquina e a executa, 
passando o parâmetro 5 na função USR. 
FIGURA 7 - PROGRAMA EM BASIC 



Renato da Silva Oliveira é diretor da XSW Publicações e 
Planejamento e Sistemas Ltda e autor de vários livros sobre 
a linha MSX. 



1888 SCREEN 8 : WIDTH 48 : KEY OFF 

1818 FOR F=SrlD880 TO SHD888 

1828 READ Ai : POKE F ,VAL("SH"+AS) 

1838 NEXT F : CLEAR 2«8,M)888 

1848 DEFU5R8-8HD888 : POKE 8,U5R8(5> 

195* ' 
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DATA 
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28 


87,3E,C9 


1228 
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32 


9A 


FB 


18 


0B 


21,22. D8 
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DATA 




9B 


RD 
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88, FE, IS 
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27 


21 
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3A,7E,D8 
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7E, 08,18 
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CD 
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D«,DB,98 
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cv 
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99 


7C,E6,3F 
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Dj 
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CO 
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DATA 
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1360 


DATA 
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58 


53 


57 


20 


52,53,4F 
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Note que quando as variáveis CSRX ou CSRY forem alteradas, 
forçando a mudança de posição do cursor, o caractere armazenado 
em CURSAV é repassado para a sua posição original na tela, 
restabelecendo assim o seu aspecto antes da formação do cursor. 

Como pudemos notar, não existe um desenho "fixo" para o 
caractere cursornos micros MSX. Seu desenho é sempre redefinido 
para apresentar o inverso do caractere sobre o qual ele se encontra. 

Agora vamos ilusirar um processo pelo qual podemos interferir 
na formação do cursor.Para isso leremos que recorrer ao uso de um 
hook da rotina de interrupção do micro. O primeiro hook chamado 
pela rotina de interrupçãoéo HKE YI, em &HFD9 A. Vamos apontá- 
lo para um pequeno programa em L.M. que vai alterar a formação 
do cursor. 



Observe a listagem da figura 6. Ela apresenta a nossa rotina com 
alguns comentários sobre seu funcionamento. 

Convém terem mente que ela ébastante específica, funcionando 
apenas naSCREEN 1 e ainda com uma restrição para a última linha 
da tela. 

Existem outras formas mais rápidas, mais curtas e mais 
genéricas para se produzir o mesmo efeito, usando algumas rotinas 
que já existem prontas na ROM do micro. Preferimos, entretanto, 
dar mais atenção ao aspecto ilustrativo que ao de eficiência e 
optamos pela rotina ora apresentada. 

Vamos ver inicialmente como deve ser gerado o programa em 
L.M. a partir da listagem em assembly da figura 6. 



Figura 6 - LISTAGEM EM ASSEMBLY 




NOVOS CARACTERES 
EM SCREEN 1 



SILVIO CHAN 



Tem havido um grande aumento no número de programas, 
principalmente jogos , desenvolvidos exclusivamente em 
SCREEN 1. Isso sc deve "as facilidades oferecidas por essa tela. 
que antes era renegada a um plano inferior, como a possibilidade de 
sc redefinir lotaJmcnic o conjunto de caracteres e de colorir cada um 
dos ocieios (grupos de oito caracteres) com cores distintas. Além 
disso, a morosidade da tela SCREEN 2 cm relação à produção de 
gráficos mais sofisticados através do BASIC MSX também con- 
tribui para a afirmação da SCREEN l. 

Este artigo é uma continuação do "PROGRAMAÇÃO 
GRÁFICA EM SCREEN 1", que foi publicado na revista CPU 
número 2. 

O meu objctivo aqui ó demonstrar aos leitores que com uma 
simples rotinacm BASIC é possível alterar odesenho doscaracteres 
da SCRHKN 1 para padrões mais compatíveis com os programas 
onde serão utilizados. Embora a alteração dos padrões dos ca- 
racteres possa ser feita através do programa redefinidor apresentado 
no artigo anterior, com a vantagem de podermos redefinir os 
caracteres para quaisquer novos padrões, o método de redefinição 
por rotina tem, por sua vez, a vantagem de ocupar apenas a memória 
necessária para armazenar a rotina, enquanto o redefinidor precisa 
de memÓTia para guardar todo o novo conjunto de caracteres, isto é, 
dois Kbytes. Logo, a vantagem da rotina redefinidora é muito bem 
vista por quem faz programas extensos e precisa de alterar o padrão 
dos caracteres. 

Para se criar uma rotina é preciso, além de conhecer a estrutura 
da VRAM, também ler conhecimentos sobre as tabelas verdade das 
operações lógicas do MSX (veja artigo publicado em CPU número 
6), principalmente OR e AND e saber realizar rotações de bytes. 

Partindo do pressuposto de que os leitores já possuem um certo 
conhecimento arespeito da estrutura da VRAM, vou apenas lembrar 
que a tabela de padrões dos caracteres em SCREEN 1 inicia e 
termina, originalmente, em 0 (zero) e 2047, respectivamente, tendo, 
portanto, a extensão de dois Kbytes. 

As tabelas verdade das operações lógicas OR e AND são as 
seguintes: 



A rotação de bytes c leita através da divisão ou da multiplicação 
do valor do byte por 2 . onde n é o número de bils da rotação. Para 
fazer rotação de byte para a direita, deve-sc dividir, c. para a 
esquerda, multiplica-sc. Veja como: 



TABELA VERDADE - OPERAÇÃO OR 


A 


OR 


B 


= C 


0 
1 

0 

1 




0 
0 
1 
1 


0 

1 
1 
1 




TABELA VERDADE - OPERAÇ 


ÃO AND 


A 


AND 


B 


C 


0 

1 
0 
1 




0 
0 
1 
1 


0 
0 
0 
1 



ROTAÇÃO PARA A DIREITA 



l(H)IHi(](IO/2l = 01000000 
10000000/22 = 00100000 
10000000/27 = 00000001 



ROTAÇÃO PARA A K.SQl KRIU 



00000001 * 21 - 00000010 
00000001 * 22 = 00000100 
00000001 - 27= 10000000 



A seguir, apresento oito exemplos de rotinas rcdcfinidoras de 
padrões de caracteres e explico seus algoritmos. 

CARACTERES BOLD 

O conjunto de caracteres BOLD possui o traço mais largo e 
grosso do que o dos caracteres normais. Podemos obtè-lo através da 
rotação de um bit para a direita dos bytes que compõem os ca- 
racteres, que equivale a dividir o valor original por 2 e, em seguida, 
efetuandoa operação OR entre o byte original e o alterado. Observe: 
ROTAÇÃO OP.OR 




ORIGINAL ALTERADA BOLD 

ROTINA PARA GERAR CARACTERES BOLD 

10 SCREEN 1 : FOR 1=1 TO 2047 : VPOKEI , VPEEK ( I) 

OR VPEEK í I ) / 2 :NEXT 
Observação: Uma outra rotina para gerar caracteres BOLD foi 
publicada no informativo da Editora Aleph número 10, possuindo o 
mesmo algoritmo. 

CARACTERES LARGOS 

Para se gerar caracteres LARGOS podemos usar o mesmo 
princípio gerador dos BOLD. No entanto, antes de realizar a 
operação OR entre a matriz alterada, será necessário colocar uma 
máscara através da operação AND sobre cada matriz. Na original 
serão preservados os três bits da esquerda e, na alterada, oscincobits 
da direita. Só então será feita a operação OR entre as matrizes 
"mascaradas", obtendo, assim, os caracteres LARGOS. 

CPU 7 



Ml ■ 

ORIGINAL ALTERADA' 

MÁSCARA ORIGINAL ORIGINAL 

MASCARADA 

MASCARA ALTERADA ALTERADA 

MASCARADA 



CARACTERES SEMI-BOLD 

Denominei estes caracieres de semi-bold porque, dos oito bits 
que formam um byte de padrão, quatro têm características BOLD e 
os outros quatro são comuns. Podem ser de dois tipos: ESQUERDA 
BOLD E DIREITA BOLD. 

ESQUERDA BOLD 

Paraseobtercstetipo,faz-scarotaçãodeumbitparaadireitados 
bytes da matriz original. Coloca-se uma máscara na original para 
que somente restem as irés colunas da esquerda. Realíza-se a 
operação OR entre a matriz e a "mascarada", 



■ Hl 

ORIGINAL ALTERADA 

1M-11 



5- ""íff" Íf--!f - MÁSCARA ORIGINAL MASCARADA 

M ™ m .§j| gm 

ORIGINAL ALTERADA LARGO F T 

MASCARADA MASCARADA p I ' H~H ™ I ( H"T" 



ORIGINAL ALTERADA LARGO 

MASCARADA MASCARADA 

ROTINA PARA GERAR CARACTERES LARGOS 

10 SCREEN 1 : FOR 1=0 TO 2047 : K=VPEEK{I) AND 
SB11100000 : L=(VPEEK(I)/2) AND &B00011111 : 
VPOFÍEI,K OR L : NEXT 

CARACTERES LARGOS BOLD 

Este tipo decaracteresé o resultado da união das rotinas LARGO 
e BOLD. Para obté-los, gera-se os caracteres LARGOS nor- 
malmente e, em seguida, realiza-se a operação OR entre a matriz 
larga original e uma matriz largacom um bitderotação para adireita. 



ALTERADA ESQUERDA BOLD. 



DIREITA BOLD 

Seguindo o mesmo processo, consegue-se o tipo DIREITA 
BOLD. A única alteração será o uso da máscara na matriz alterada, 
fazendo com que restem somente as cinco colunas da direita, 
enquanto a matriz original nâo recebe nenhuma máscara, fí 
inalterada. 



■ -■li ■ 1111 

□XninjJ I I I I I I I U 111111111 MÁSCARA ALTERADA MASCARADA 



LARGO 
ORIGINAL 



LARGO 
ALTERADO 



LARGO 
BOLD 



ROTINA PARA GERAR CARACTERES LARGOS BOLD 

10 SCREEN X : FOR 1=0 TO 2047 : K=VPEEK(It AND 
SB11100000 : L-VPEEKID/2) AND SB00011111 : 
M-K OR L : VPOKE I,M OR M/2 : NEXT 

8 CPU 



mm 




DIREITA BOLD 



ROTINAS PARA GERAR CARACTERES SEMI-BOLD 
ESQUERDA BOLD 

10 SCREEN 1 : FOR 1=0 TO 2047 : K=VPEEK (I) AND 
SB1 1100 00 0 : L=VPEEK{Ii/2 : VPOKEI,KORL : 
NEXT 

DIREITA BOLD 

10 SCREEN 1 : FOR 1=0 TO 2047 : K=(VPEEK(I) /2) 
AND SB00011111 : L=VPEEK(I) : VPOKE I,KOR L : 
NEXT 

CARACTERES ESTREITOS 

Para obter este conjunto, colocamos uma máscara sobre a matriz 
original de modo que sobrem apenas as três colunas da esquerda. O 
resultado será chamado de "mascarado um". Novamente, com a 
matriz original, coloca-se uma máscara com a operação AND, para 
que fiquem somente as seis colunas da direita. Multiplica-se o valor 
de cada byte por dois para conseguir uma rotação de um bit para a 
esquerda. Fazemos uma OR entre a resultante e a "mascarada um" 
e obtemos a matriz eslreita. 



CARACTERES INCLINADOS 

Para se criar caracteres inclinados, bastafazer arotaçãodos bytes 
da matriz dos caracteresdemodoque os bytes decima ouosdebaixo 
recebam um maior deslocamento. Dessa maneira, os caracteres 
poderão aparecer inclinados para a direita ou para a esquerda. 

INCLINADOS PARA A DIREITA (ITÁLICOS) 
Nos caracteres inclinados para a direita ou itálicos, os bytes da 
matriz sofrem as seguintes rotações: 

Primeiro e segundo bytes - dois bits para direita 
Terceiro ao quinto - um bit para a direita 
Sexto ao oitavo - inalterados. 



■ 



ROTAÇÃO 




MASCARADA UM 



INCLINADOS PARA A ESQUERDA 

Nos caracteres inclinados para a esquerda, as rotações ocorrem 
de maneira inversa. Veja: 

Primeiro e sgundo bytes - inalterados 
Terceiro ao quinto - um bit para a direita 
Sexto ao oitavo- dois bits para a direita 




MÁSCARA ORIGINAL MASCARADA 



MASCARADA RESULTANTE 



MASCARADA UM RESULTANTE ESTREITO 



ROTINA PARA GERAR CARACTERES ESTREITOS 

10 SCREEN 1 : FOR 1=0 TO 2047 : K=VPEEK(I) AND 
&B11100000 : L={VPEEK(I) AND SB001111111) *2 
:VPOKEI,KORL: NEXT 



ROTAÇÃO 



INCLINADO 
PARA ESQUERDA 



ROTINAS PARA GERAR CARACTERES INCLINADOS 

INCLINADOS PARA A DIRfTTA 

10 SCREEN 1 : FOR 1=0 TO 2047 STEP 8 : FORN=l TO 
1+1 : VPOKENMV PEEK (N) /4 : NEXT : FOR N=I+2 TO I 
+ 4 : VPOKEN, V PEEK (N) /2 : NEXT : NEXT 



INCLINADOS PARA A ESQUERDA 

10 SCREEN 1 : FOR 1=0 TO 2047 STEP B : FORN=I+2 T 
O 1+4 : VPOKE N, V PEEK (N) /2 : NEXT : FORN=I+5 TOI 
+7 : VPOKEN, V PEEK (N) / 4 : NEXT : NEXT 



m 
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BUS EXPANSION E RESET 
NO EXPERT 

RUBENS HENRIQUE KUHl JR. 
PAULISOFT INFORMÁTICA 



Assim que os MSX foram lançados na feira de informática 
de 1985, surgiu uma richa entre os adoradores do Expert e os 
apaixonados pelo HotBit. Todos tentam provar que o seu é o melhor 
micro e ressaltam os pontos negativos do outro. Apesar de n3o 
querer entrar nessa briga, este artigo vem suprir um ponto falho do 
Expert e mostrar como usar um dos seus recursos extras. 

BOTÃO DE RESET 

Sem sombra de dúvida, um grande erro da Gradiente foi 
não ter dotado o Expert de botão de reset. Ele existe em quase todos 
os outros MSX do mundo e o motivo por que ele foi excluído do 
Expert é estúpido: falta de lugar. A equipe de design nao achou onde 
colocá-lo no gabinete.e a engenharia afirma que éimpossível passar 
os fios pelo cabo do teclado. 

Mas o reset não foi esquecido. Há dentro do Expert um 
circuito completo de reset, incluindo supressor de oscilação da 
chavee temporizador para manter o sinal o tempo necessário. E onde 
ele está conectado? Ali atrás, no Bus Expansion. 

No barramento do MSX há duas linhas (S W 1 e S W2) que 
detectam se há um cartucho presente. Mas como não se pode (a 
princípio) colocar cartuchos no Bus Expansion, estes pinos foram 
ligados ao circuito de reset. Assim, basta ligar um deles ao +5 V para 
obter o reset. 

Mas nao há um reset porSoftware? Ele nâoé melhor? Bem, 
quando funciona ele é sim. Mas muitos programas costumam 
deixá-lo inoperante. Fica difícil usar o Konami GameMaster nos 
jogos comuns sem ter um botão de reset, como o do HotBit. 

Este botão de reset estraga o micro? Nao, de formaalguma. 
Infelizmente, alguém divulgou um circuito de reset que usavao sinal 
RESET do barramento, esquecendo que esse sinal é exclusivamente 
de saída. O mesmo vale para alguns cartuchos que possuem este 
botão, já que os sinais SWl e SW2dos conectores A e B funcionam 
de modo normal. 

A instalação é simples. Nao é necessário abriro micro, nem 
requer conhecimentos de eletrônica, apenas cuidado e atenção. 
Como se vê na figura 1 , basta achar o Bus Expansion, contar a 
terceira fileira da esquerda para a direita e soldar (ou prender) dois 
fios ligados aos terminais de um interruptor (chave liga-desliga n3o 
serve, mas serve até botão de campainha!) e pronto. 



(BUS EXPANSION ) 
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BUS EXPANSION 

Até hoje, poucas pessoas vêem utilidade no Bus Expan- 
sion. A idéia da Gradiente era reduzir o problema do baixo número 
inicial de slots do MSX, fora o fato de que o Bus Expansion facilita 
a aplicação do Expert em controle industrial. 
10 CPU 



O Bus Expansion é uma extensão do conector frontal B, 
mas com uma limitação: se houver um cartucho no slot B, nenhum 
dispositivo com acesso por endereços (cartuchos com ROM ou com 
RAM entre outros) será selecionado. 

Mas dispositivos controlados por portas, como as inter- 
faces de comunicação e alguns programadores de EPROM, entre 
outros, podem ser ali ligados, deixando um slot livre. Outra 
aplicação é a cópia de programas em cartucho, bastando deixaroslot 
B vazio e encaixar o cartucho com o micro já ligado. 

O material pode sair caro, mas ter um conector a mais 
compensa a redução do tira-e-põe de cartuchos. A montagem fica 
assim: num conector fêmea de 50 pinos, solde um cabo plano de 50 
vias (quanto mais curto, mais barato e menos interferência) e neste 
um conector macho para cartucho igual ao que tem dentro do Expert 
(cuidado com a pinagem. Veja, na figura 2, como ela é ao contrário 
dado cartucho). Não ligue o cabo nos pinos 44 e46 (SWl eSW2), 
pois fazem parte do circuito de reset (a ligação do botão de reset fica 
igual), 



(CARTRIDGE A«B) 
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CAPS LOCK 

Para finalizar, não poderíamos esquecer de outra falha do 
Expert: o led do Caps Lock. Novamente, o argumento da Gradiente 
é o cabo do teclado ou o design. Só que eles não notaram que se 
houvesse mais duas vias para o reset e mais duas para o led, haveria 
cabo e conector disponíveis até em loja de eletrônica. 

No nosso caso, resolver o problema é difícil, pois seria 
necessário soldar um fio na PPI para ligar no Led, o que pode ser 
arriscado e ainda atrapalhar uma futura venda do micro. 

Já que os adoradores do HotBit não devem ter lido até aqui, 
despeço-me dizendo que acho o Expert melhor, apesar do teclado 
(blargh!) c das falhas que discutimos aqui. Mas o Hotbit nao deixa 
de ser um MSX, que é o melhor padraode 8 bits do mundo. Pena que 
ainda não tenhamos o MSX 2.0 ou o MSX 2.0 +. 



Rubens Henrique Kúhl Jr. cursa engenharia elétrica na 
USP. Programa em MSX há três anos, trabalhando atu- 
almente para a Paulisoft, onde desenvolve projetos em 
Basic, Pascal, C e Assembly, dentre eles o copiador de 
discos. . 
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NÁO É MÁGICA É TECNOLOGIA 

UM INCRÍVEL SOFTWARE QUE VAI DEIXAR SUAS ROTINAS DE CÁLCULO E PLOTAGEM DE GRÁFICOS DE 6 A 20 
VEZES MAIS RÁPIDAS! MSX TURBO É UM COMPILADOR QUE OPERA NA MEMÓRIA, ACELERANDO 
INCRIVELMENTE AS OPERAÇÕES DE CÁLCULO. 

FITA/DISCO - NC2$ 25,80 



Finalmente alguém pensou em você, técnico ou hobista 
de eletrõnica e criou um auxiliar para seus projetos. 
Tabela padrão de simbologia em Eletrõnica; 
Recursos p/edição, montagem e impressão de esquemas 
p/projetos eletrônicos. 
Acompanha Arquivo Exemplo. 




A partir de agora, a apresentação dos seus esquemas 

terá aquele toque profissional! 

Autor: PAULO MARQUES FIGUEIRA 

FITA/DISCO - NCZ$ 25,80 



Super Editor de sprites 1 6x16 que inclui rotinas para 
reversão, espelho de 1/2 e 1/4. 




O manual que acompanha o Software e genuinamente 
um curso sobre sprites. Inclui rotina para animar os 

sprites que você criar. 
Ferramenta indispensável ao programador e a quem 
deseja explorar e conhecer os recursos do MSX. 
Autor: FÁBIO A. R. CORREA 

FITA/DISCO- NCZ$ 19,40 
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GRAPHIC VIEW 




EROTIC SHOW - NCZS 6,00 


Incrível programa para criar animações ç 


ráficas. 








MEGA MUSIC - NCZ$ 5,00 



Software 100% nacional com manual, cópias com n a de série, garantia de "up to date" e assistência ao usuário. 
Incríveis produtos que vão lazer o seu MSX virar uma máquina quente. 

Envie seu pedido para a Cx. Postal 64.01 9 - CEP 02227 SP/SP, acompanhado de cheque nominal ou 
vale postal, ou visite-nos: Av. Prestes Maia 241 - Conj. 908 (a 1 00 metros da Estação São Bento do 
Metrõ). Fone (01 1 ) 228-1 313 



Caso deseje solicite catálogo completo (grátis) c/ nossos Produtos. 



FAIXAS E CARACTERES NO MSX 



PlERLVIGl PIAZZI 
+50 DICAS PARA MSX 
EDITORA ALEPH 



Recentemente, meu filho de 13 anos me perguntou se o Apple 
da Editora estava livre para que ele pudesse usá-lo por algumas 
horas. Fiquei intrigado. Afinal de contas, minha edilorac especiali- 
zada cm MSX e, entre Expert e Hotbil temos uma dezena dessas 
máquinas em uso. Porque ele haveria de querer logo um Apple'? 

Aí ele me explicou que queria fazer, na impressora, algumas 
faixas e cartazes para a feira de ciências do colégio, usando o 
programa "Printshop" do Apple. 

Ofendidíssimo nos meus brios de "MSX-maníaco", sentei em 
frente a um Expcrte, pouco tempo depois, gerei o programa listado 
nesta matéria. 

Obviamente, como editor e escritor, resolvi aproveita-lo, numa 
versão mais sofisticada, para o próximo lançamento da Alcph: 
"+50 Dicas para MSX". Mas, enquanto o livro não sai, o editor da 
CPU e eu resolvemos brindar os leitores desta revista com mais 
uma rotina útil para seu MSX. 



'PROGRAMA DO LIVRO +50 DICAS P/MSX 
'EDITORA ALEPH 1988 

Cl EAR1024iPOKE8HF417,255sDEFINT A-Z 

I PRINTCHRSC27>"A"CHRS<B> ! SSCRE6N 1 

LA=6 - 'LARG - DO CARACT .( 6/7/8 > 

LI=2s 'LARG. DE IMPR.d A 32) 

HI = ó! 'ALTURA DE IMPR.d A V P/80 COL 

E 1 A 14 P/132 COL) 

MP »H I « 6 4 1 M S = H P \ 2 5 6 : L S = H P MOO 256 

WT = t: "<1 A 4) DEFINE TEXTURA 

UW=-i70* < UT = 1 ) -284* < UT = 2 ) - 240» ( WT-3 ) 

-255*<UT=4> 

INPUT"8UAL A MENSAGEM"; Aí !IF LENÍ.A4) 
>250 THEN CLSSPRINT"LONGA DEMAIS!": 
HOTO 20» 

GOSUB 359IF0R 1=1 TO LEN(At) 

C*»MIDÍ < AI , 1 , 1 ) = E = ASC ( CS ) *e 

FORK =0107 : X = E + K ! YÍ,=B IN4 ( UPEEK < X > > 

Bí <K)=R IBHTS< "00000000"+YÍ , 8 ) : NEXTK 

FOR F=1T0LA:P*=""=F0R J=7TO0STEP-i 

P* = P4+MID9><U*( J> ,F,1) =NEXT J 

GOSUB 288INEXT F,I:END 

FOR M=l TO LEN(PÍ>=T4=MIDÍ<PÍ,H,1>= 

T(M)=UAL(TÍ >«WU:NEXT M 

FOR N=l TO LI 

IF VA1..<"«H1" + PÍ )=0 THEN 340 

LPR INT CHRl ( 27 ) "K"CHRÍ ( LS ) CHR4 ( MS ) ; 

FOR M=l TO LEN(Pii) =F0R G=l TO 8«HI 

LPR INT CHR4CKM) ) ; :NEXT D,M 

LPR I NT CHR4<10);=NEXT NíRETURN 

04="":F0R R=í TO LEN(AS) 

SÍ = MIDÍ ( A4.R , 1 ) :S = ASC(Si) 

IF S>31 THEN a*««S+SS 

IF S=l THEN «Í=8t+CHR4 

<ASC<MID4<A4,R + i,l> )"fj4> ::R = R + i 

NEXT R!A*=0í íRETURN 



Após digitar (e gravar!) o programa listado, o usuário 
pode fazer algumas alterações para adptá-loãs suas necessi- 
dades. 

Na linha 140 c definida a largura do caracter a ser usado 
(LA), que pode variar dc 6 a 8. Usando o valor 6, leremos o 
espaçamento da SCREEN 0 {alguns caracteres gráficos 
sairão "cortados"). O valor 8 reproduz os caracteres como na 
Screenl (8x8 pontos). 

Na linha 1 SOdefine-se a largura de impressão (de 1 a 32). 
Quanto maior LI, mais "gordas" sairão as letras do cartaz. No 
programa usamos o valor 2 (veja a figura exemplo), gerando 
letras tipo "Marcos Maciel". 

Na linha 160 definimos aaltura das letras, até um máximo 
dc 9 para impressoras de 80 colunas (cuidado: existem im- 
pressoras, como a Grafix MTA que aceitam um máximo de 
7) ou 14 para 132 colunas. 

Na linha 180, a variável WT define a textura da 
impressão, desde traços finos (WT=1) até traços cheios 
(WT=4) 

Rode o programa algumas vezes com parâmetros 
diferentes e mensagens curtas, para se familiarizar com seu 
funcionamento. 

Além da utilidade intrínseca da rotina, há uma lição que 
pode ser tirada deste programa: o MSX é um micro tão 
versátil e tão "USER FRIENDLY" que programadores 
medíocres (como é o meu caso), usando linguagens fáceis 
(como é o caso do Basic), podem gerar, rapidamente, rotinas 
que, em outra máquinas, exigiriam programadores de pri- 
meira linha, usando, no mínimo, linguagem assembly. 

Esta talvez seja a maior virtude do MSX e a razão do seu 



Pierluigi Piazzi é autor de vários livros para MSX, 
sendo diretor- editor da Editora Aleph. 
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FORMATANDO ARQUIVOS 
DE TEXTO 

GUSTAVO F.BAYER 



Por causa do seu baixo custo e da fa- 
cilidade de obtenção dos caracteres espe- 
ciais da língua portuguesa no seu teclado, 
os micros MSX têm tudo para se tomarem o 
equipamento perfeito para a elaboração de 
textos. Por isso é quase inexplicável a 
inexistência de um programa maiscompleto 
de processamento de textos que, além dos 
recursos convencionais de definição de 
margens, salto automático de linhas com 
transferência de palavras excedentes e 
alinhamento à direita, manipulação de blo- 
cos etc., aproveite as facilidades do teclado 
MSX, seja no controle do cursor ou na 
geração dos caracteres acentuados e 
cedilhas do português. 

Entre os processadores de texto 
disponíveis, o que mais se aproxima desse 
ideal é o SCED, normalmente usado na 
digitação de programas para posterior 
compilação. 

Suas grandes vantagens são traba- 
lhar em 80 ou 40 colunas de vídeo, com 
linhas de até 1 32 caracteres, aceitar todos os 
caracteres produzidos pelo teclado MSX e 
gravar os arquivos em formato ASCII puro 
(cada linha é gravada com os códigos 
ASCII de seus caracteres, seguidos porOA e 
0D, correspondentes ao "linefeed" e ao 
"return"). Isso permite a geração de ar- 
quivos facilmente tratados por rotinas de 
impressão já disponíveis, comoaPIP.COM 
c até mesmo a incluída no MSXWRITE, ou 
por rotinas especificamente elaboradas para 
a impressora em uso, como as para a MTA e 
a LADY 80, já comentadas nessa revista. De 
resto, os demais comandos de deslocamento 
do cursor, "scroll", divisão e junção de 
linhas, busca c troca de palavras, gravação 
e leitura dearquivos e de pesquisa dos discos 
em uso, são no mínimo tão acessíveis e 
eficientes quanto nos outros processadores 
de texto. 

Em alguns aspectos, entretanto, o 
SCED deixa a desejar. 

Sua rotina de manipulação de blocos 
é trabalhosa: os blocos não são marcados, 
mas indicados por sua linha inicial e pelo 
número de linhas, e só podem ser copiados 
(sem opções de transferência ou 
eliminação). Mais grave, porém, é a impos- 
sibilidade de definição de margens e, por 



causa disso, a inexistência do salto 
automático de linha com transferência de 
palavra excedente e alinhamento à direita. 

Para a ausência do salto automático 
de linha, a solução é proceder como na 
máquina de escrever: dando "return" ao fim 
de cada linha. Com isso, o alinhamento à 
direita tomar-se-ia extremamente tra- 
balhoso, pois além do controle preciso do 
salto de linha, os espaços necessários teriam 
que ser inseridos manualmente entre as 
palavras. 

O programa aqui apresentado foi de- 
senvolvido exatamente para suprir a 
ausência de uma rotina de alinhamento 
automático no SCED, aproveitando a facili- 
dade de manuseio dos arquivos por ele gra- 
vados. Em princípio, ele fijneiona de modo 
semelhante à função de acertar parágrafos 
dos editores de texto baseados no 
TAS WORD: a partir da definição inicial do 
número desejado de colunas por linha, cada 
parágrafo do arquivo original é formatado 
com alinhamento automático à direita, e o 
texto formatado é gravado em um novo 
arquivo (cuja extensão é o número de 
colunas usado na formatação). 

As situações interpretadas como 
início de novo parágrafo são as seguintes: 

-linha cm branco; 

recuo de início de parágrafo (5 espa 
ços vazios); 

-linha iniciada com algarismo; 
-linha iniciada com hífen ("sinal 
de menos"), 

Os trechos a serem excluídos da 
formatação, por exemplo tabelas, deverão 
ser precedidos e seguidos por linhas que 
contenham apenas dois caracteres ASCII 
200 (GRAPH L no Hotbit ou LGraL no 
Expert). 

O programa foi escrito em MB ASIC, 
por esse ser o único BASIC acessível ao car- 
tucho de 80 colunas da SHARP, e princi- 
palmente pela possibilidade de sua 
transformação em um programa com a 
extensão .COM, através do BASCOM, o 
que permite uma substancial aceleração do 
seu processamento. Para rodar em telas de 
40 colunas, deverá ser acrescentada a 
seguinte linha: 



75 WIDTH 40 

A compilação através do BASCOM 
é bastante simples. Uma vez digitado e tes- 
tado o programa, ele deve ser gravado no 
formato ASC II, através do comando: 

<save "alinha.bas",a>. 

Retomando ao DOS, comande: 

<bascom alinha=alinha>. 

O BASCOM analisará o programa, 
gravando um arquivo intermediário com o 
nome ALINHA.REL, encerrando com a 
mensagem de possíveis erros assinalados. 
Havendo erros, eles deverão ser corrigidos e 
oprocessamentopeloBASCOMdeverá ser 
reiniciado. A seguir, comande: 

<link alinha,alinha/n/e>, 
e o BASCOM compilará e gravará o pro- 
grama ALINHA.COM. (Para compilar 
outros programas, basta por o nome princi- 
pal desse programa no lugar do "alinha" dos 
comandos acima citados.) Para facilitar a 
adaptação do programa em BASIC MSX 
por quem não disponha do BASCOM, ele 
foi escrito sem aproveitar recursos exclu- 
sivos do MBASIC, tais como os laços 
WHILE - WEND e a designação de 
variáveis por extenso. Por isso, basta digitar 
as seguintes linhas: 

75 CLEAR 500 :MAXFILES=2 :KEYOFF 
110 OPEN EN$ FORINPUTAS#l 
190 OPEN SAS FOROUTPUTASÍ2 

O programa em BASIC MSX é, en- 
tretanto, bastante mais lento que o programa 
compilado: apesar do tempo gasto com o 
acesso contínuo ao Drive ser o mesmo, o 
programa em BASIC MSX leva quase o 
dobro do tempo usado pelo programa COM 
no processamento de um arquivo de texto. 

Como observação final, é impor- 
tante registrar que esse programa não tem 
maiores pretensões que ser um "quebra- 
galho". Afinal, ele foi desenvolvido por um 
mero usuário levado ao autodidaiismdXta 
programação pela insuficiência de 
utilitários para o processamento de textos. 
Sugestões e programas mais eficientes são 
benvindos, principalmente se algum defen- 
sor do"software nacional" desenvolver, fi- 
nalmente, um editor de textos à altura dos 
micros MSX aqui fabricados. 

CPU 13 



ii iniimmiiimiiimmítmiut 

21 'I Foreatador de arquivos de teito I 
3! I Linjuajee: HBAS1C I 

<> Mil i miitimiu 

si ' 

48 ' 

7B ' Ull INICIALIZACAO Ill 

BI OlH PLt(4B),TH(4BI 
71 PR1KT CHRI[12):F0R F=I 10 18:PRHT 1 
I ';:NEXT F:PRIHT:PRIHT't FORNOTnoOR K 
flHQUIWOS DE IEI70 l-;F0R F=l 10 18:PRI 
NT'I , !i«ir F:PRI»T!PRINT:FIL£S:PRINT 
CHRK7I 

11» PRINT CHRt[7l:LI«E INPUT "Arquivo a 
loreatar ? ";ENI:IF EHI=" THEN 6OT0 1 
II 

lie oPECi-.m.Eii 

121 A*l:AI=«IDI(ENt,A,l| 
1JI IF AL" THEN SAI«ENI|60T0 161 
141 IF MO'.' THE» 6010 121 
151 SA=A-l:SAI=LEFTt(ENt,SAI 
111 PRINT CHRt(12l:LI«E INPUT-»! tnbaun 
to (direita) na coluna? '|CL*:1F CLI=" 
THE» 60T0 UB 
171 Cl-VK.IB.il 
181 SAI-SAItVICLI 
Hl 0PEN'0',«2,SAI 
211 PRIHT CHRII12I 

211 ' tlll VERIFICAÇÃO DO AR001VO llltl 
221 IF EOFUIO-l THEN UNE INPOTH.LAI 
ELSE END 

231 IF E0FI1IO-1 THEN LINE INPUTH1 , LCt 
ELSE LCI=" 
2(1 FP=I:IF LCI=" OR LCI«CHRt(28B|tCHR 
1(2111 OR LEFTI|LCI,SI=' ' 08 LEFTI 
{LCI,1]=CHRI|I5I OR (L£FTI(LCI,1|>CH«1I 
17) AND LEFTI[LCI,1|<CHRK5B!I THEN FP> 



2SI TA=LEN(LAII 

241 IF LAI=" THEN SOTO 548 ELSE IF LAI 

=CHRI(2B8I+CHRII2B8) THEN SOTO 718 

271 IF TA=CL THEN SOTO 54B 

281 IF TA<CL AND FP=1 THEN SOTO 348 

298 IF TA<CL THEN GOTO 628 

388 ' Itllll PALAVRAS EXCEDENTES lllttt 

311 CA=LEN(LAI|:PLI=" 

328 CM>HIDI[LAI,CA,1| 

331 IF CADCHRK32I THEN PLI=CAI*PLIiCA 

=CA-1:S0T0 328 

348 LBI=PLt+CHSI[32|tLBI 

358 IF RIGHTiaBI,ll=" ' THEN LBI=LEFTI 

(L8!,ILEN{LB!)-1)1:GGT0 358 

318 LAi=LEFTI(LAt,(CA-I)):TA=LEH(LAI) 

378 IF LENILAIDCL THEN SOTO 318 

381 IF LENILAÍ j =CL THEN SOTO 548 

378 ' llll DECOHPOSICAO DE LINHAS lllll 

181 FOR F=l TO I8:PLI[FI=":TH(F1=B:HEI 

T F 

418 PL=8:CA=8 

428 PL>PL»1:AI=PLIIPL-II:IF Al=' ■ OR A 
!■■ ■ OR »!>■ ■ OR >%'• • OR Al= - 

" THEN PL=PL-1 
438 CA=CA*l:CAI=HI0IILAt,CA,!l:PLI[PU= 
PLIIPLItCAI 
441 TH1PL|=IH(PL|+1 

458 IF CADCHRII32I THEN SOTO 438 ELSE 
IF CAI=CHRI(32) THEN BOTO 428 
418 ' tttttttttt ALINKAHENTB tlttlltttt 
471 CP=CL-TA:IF CP=I THEN 60TO 511 
488 PA=PL 

471 FOR F=l TO CP:PLt(PAI=CHRI(32]tPLl[ 
Pfll:PS=Pft-l:IF PA=1 THEN PA=PL 
511 HEIT F 
518 L»l=" 

521 FOR F=l TO PL:LAI'LAItPLI|FllPLI(FI 
=":NEXT F 

531 ■ llllll 68AVACA0 E REINICIO llllll 



541 PRIHT LAI:PRI»T»2,LBt 

551 IF LB1>" AND FP=1 THEN LAI=LBI:LBI 

=":60IO 251 

511 IF LEHILBI)=>CL THEN LAI=LBI:LBI=" 
iSDTO 258 

571 IF LBI>" THEH LAKLBtf VLCI 
581 IF LBI=" THEN LAI=LCI 
5»! LBI=":LCt=":IF E0F(l|O-i THEN 60 
TO 238 

188 IF LAI>" THEN TA»LEH(LAI):60T0 218 
118 CLOSE;FOR F=l TO Í7:PRINT'I "; :HEIT 
F:PRINT:PRIHT'I FORHATACAO DE TEXTO CO 
«CLUIDA l':FOR F=l TO 17:PRINT"I '|Hll 
T FiEHB 

121 ' III COHPLEHENTACAO DE LINHAS llll 
138 IF LCI>" THEN CA.|:PLI>":TC=B ELS 
£ SOTO 54B 

14B CA=CA*1:CA1=«IDI(LCI,CA,1|:PLI.PLI< 
CAI 

158 IF CADCHRK32I THEH TC=TC*1:60T0 1 
18 

118 IF CAI=CHRI(32I THEN PLI=CHBI(32I*L 

EFTt|PLt,aEN|Pll|-l|l 

178 IF CAI=" THEN PLI=CHRI(32I»PLI 

188 IF TA+l+TDCL THEN SOTO 371 

178 IF TA»ltTC<=CL THEH LAI=LAHPLI:TA» 

TAtl*TC:IF.LENILCI|>TCtl THEN LCI=RI6HT 

l(LCI,(LE»(LCI|-|TCtl||| ELSE IF EOfdl 

O-l THEN LINE INPUT»1,LCI 

7IB IF TA=CL THEN 6070 54B ELSE BOTO 13 

a 

718 ■ lllll LINHAS SE» FORHATACAO lllll 
728 LAI=LCI:60T0 758 
738 IF EOFUIO-l THEN LINE INPOTM.LAl 
ELSE 60T0 111 
7IB IF LA|.CHRI(2BBI*CHRI(2BBI THEH 60T 
O 228 

758 PRIHT LAt:PRINTn2.LAI:6OT0 73B 



X5LJ PLANEJAMENTO DE 
SISTEMA5 LTDA 



PUBLICAÇÕES E O MELHOR SOFTWARE P AH A O SEU MSX 

VOX - Smtet Izauor/DIgl tal izador de V 
ESZX 81 - Emulador Sinclair ZX 81 
3U " Iit?^ ' EOARQ - Super Editor de Arquivos em Oisc 

S3Jy ■ FLUXO DE CAIXA & CONTAS A PAGAR /RECEHER 

cjrxís) , T , Tf . HSX HRITE - O melhor Editor de Textos 0/ MSX 

^ I I ■ I ' I ■ I ■ . ^ . ' EDDV 2 Um poderoso Editor oe Desenhos 
:| |,l i jllO i llO, • EMU - Editor da Músicas em partituras 

-jU Cfe » NÊHESIS - O paradigma dus jogos de acão 
xa Postal: 1 3EU5.1 "Sri ' GAME PACK 1 . 2 I 3 - Mais oe 2B lOgos MSX 
tt • AGUARDEM ■ Super BASIC PLUS. com mais de 58 
novos comandos pêra "envenenar" seu micro! 



- ri ucui cr /ítijjua 

produtos apenas 
noa revendedores 
autorizados! Não os 
contrando, entre 
em contato conosco! 
Garanta a integridade do 
seu equipamento usando 
apenas software de 
dual i dade comprovada! 
informatize a sua 
empresa com micros 
, MSX. Cônsul te o nosso 
serviço de assessoria. 



SINTEVOZ 



JÚLIO VELLOSO 



Lendo artigos sobre a sintetização da voz, resolvi fazer um sintetizador para o MSX. Este 
programa é baseado na técnica de digitalização da voz, que converte um sinal analógico em 
digital, guardando-o na memória em formato binário para, em seguida, fazer o inverso, 
reproduzindo a voz. 

O PROGRAMA 

Utilizando o processador de som e o PPI, o programa funciona da seguinte forma: 



ROTINA 1 

Libera a RAM adicional (32k de memória) através da porta A8h da PPI. Liga o 
gravador, ressetahdo o bit 4 da porta AAh do mesmo. 

Começa, então, a parte mais importante do programa. HL é iniciado com zero, 
'DE' com aquantidade de bytes a serem gravados. Lê-se, no bit 7 dapona A2h a informação 
vinda do gravador, que pode ser 0 ou 1 . Dependendo disso, o programa seta ou não o bit 7 
do registrador C. 

Depois, o programa faz uma rotação no mesmo, repetindo isto 8 vezes, até 
completar um byte, que é colocado na memória apontada por 'HL'. O apontador HL é in- 
crementado e o DE decrementado, fazendo isto até que 'DE' fique igual a zero. 

Por fim, a rotina dcsabilitaaRAMadicional.desligaogravadore volta ao BASIC. 

ROTINA 2 

O funcionamento desta outra rotina é o inverso da primeira, pegando um bit de 
um byte da memória apontada por ' HL' e joga-o para o processador de som, repetindo isto 
8 vezes para cada byte e depois até que 32k bytes sejam enviados para o procesador de som. 

Fazendo isto, o micro reproduz a voz anteriormente gravada 

OPERAÇÃO 

Para fazer com que o programa funcione, digite a listagem do programa, tomando 
cuidado com os códigos em hexadecimal. Grave o programa e digite 'RUN'. 
Ligue o gravador, pressionando: 

'PLAY' + 'RECORD'. 

Aperte espaço e fale ao microfone (o cabo do motor e o do load têm que estar 
conectados ao gravador). 

Para que o micro reproduza a voz, digite ' I*. Para outra gravação, digite '2 e para 
voltar ao BASIC '3'. 



Júlio Velloso é estudante da UCP, na qual cursa o 4" período do Curso de Ciência 
da Computação. Programa em Basic, Assembler Z80, Pascal e dBase III, há 
qualro anos, nos equipamentos IBM-PC e, principalmente, MSX. E autor do 
programa utilitário de cópia BKP, comercializado inicialmente pela Ciberne e do 
Sistema Operacional BKP Disco, comercializado pela Paulisoft Informática. 



121 1 Por: Julio Velloio 
138 ' 

1419 SCREEN8:C0l0Ri5,l , 1 1 KEYOFF I DEFUSR=Í 
HCB8e:DEFUSRl=ÍHC83B 
1 58 REST0RE28B : F0RA=8T0135: READA* :P0KE1 
HCBBB+fl,VftL("ihVfltj:NEl(T:ft=INP(tHftB):I 
FA=iHABTHENP0ÍE*HEBflS,tHflfi:PCtEÍHCfl2D,Í 
HAB : PQKEÍHCB3A , IHAA ; P0KEMCI7A , IHA8 
1 tB PRIHTSPCI 151 ; "SINTEVOZ" :PR1«T:PRINT 
5PC{lB);'Por: Julio Vel Iqsd':PRINT:PRIN 
TíPRINT 

17B PR1NT*- Coloque o plug do ioad e ti 
rt o do save.VPRINT^RINT'- Aperte 
' play ' ♦ 'record' 
1BB PRIHT:PRIHTíPRINr:PRIKT:PRINTSPC(Í2 
); "APERTE ESPAÇO." 
198 A=STRIG(B) :IFA=8THENl?BELSEA=tjSR(B) 
288 1 

21B ' S P E A r 

228 1 

23B PRIffTiPRmTiPRINTSPCmjM - Reprod 
uz a vo Z . , :PRIMT:PRlNTSPC(91;'2 - Outra 
Gravação. ■:PRItiT!PRIHlSPC(9)i"! - Volt 
a ao BASIC.' 
248 At> I NIX Vt 1 1 FA«* " B THEKZ4WELSE A=VAL ( A 
() :0N A 6QSIIB 258, 2H,278:60TO 241 
258 A=USRl(B|sRETURH 
268 SCREENBifiERJRNlÈB 
278 SCREEN0 ; KEYON : END 
2SB DATA F3,DB,AA,CB,A7,D3,AA,3£ 
298 DATA FF, 03^8,21,88,88,11, FF 
3B8 DATA 7F,BE,BB,B4,B8,DB I A2,CB 
318 DATA 7F,2B,84,CB,F9,18,82,CB 
328 DATA B9, CD, 29, 1*^2,71,18, 23 
DATA 7A,B3,2e,E7 r 3£,FI,D3,H 
348 DATA DB,AA,CB,E7,D3,AA,FB,C9 
358 DATA F3,3E,FF,D3,AB,3E,87,D3 
366 DATA AB,3E,ea,D3,Al,3E,88,D3 
378 DATA Ae,3E,8B,D3,Al,3E,ll,D3 
388 DATA AB,3E,BB,D3,Afl.3£,B8,D3 
398 DATA AB,21,B8,B8,11,FF,7F,4E 
4B8 DATA 86,B8,F3,CB,41,28,B4,3E 
418 DATA 8F,lfi,B2,3E, 88,03, Al, CB 
428 DATA 2?,1B,EF,23,18,7A,B3,2I 
438 DATA Eo,3E,FI,D3,AB,3E f H,D3 
448 DATA A8,3E,8e,D3,AI,FB,C9,BB 



PROJETO MSXDEBUG 

PARTE I 

SÉRGIO DURIC CALHEIROS 



1) DISP endereço 

Mostra o conteúdo da memória dado por endereço. Para avançar 
ou retroceder, utilize as teclas dos cursores. Estando na posição 
desejada, pressione <CR>. Neste momento, você poderá alterar 
o conteúdo desta memória ou se deslocar ao longo dos códigos 
livremente. Para alterar utilizando dirctamcnie o teclado, pres- 
sione <CR> novamente. Repita sempre que precisar mudar o 
modo de edição. Para sair, basta pressionar <ESC>. 

2) EXEC endereço 

Executa este endereço sem break-poinls. 

3) MOVE início, fim, destino 

Move um bloco na memória. Início deve ser menor que fim. 

4) FILL início, fim, dado 

Preenche uma área dc memória especificado por início e fim, 
com o dado fornecido. 

5) DIR 

Mostra o diretório do disco de forma simples. 

6) DSAVE nome. ext, início, fim 

Salva o bloco limitado por início e fim no disco com o nome 
nome.ext. Salva qualquer coisa em qualquer lugar. 

7) DLOAD nome.ext endereço 

Carrega qualquer arquivo, desde que esteja no disco e o coloca 
no endereço dado por endereço. Nestes três comandos não é 
possível especificar o drive. Será utilizado aquele que estava 
habilitado antes de executar o MSXDEBUG. 

8) DOS 

Encerra as atividades no MSXDEBUG e retorna ao DOS. 



Frequentemente, ao abrir uma boa revista especializada em 
software, nos deparamos com bons programas, mas que, invariavel- 
mente, estão contidos em listagens quilométricas cm Basic, con- 
tendo código em dezenas de linhas DATA. Imagine o trabalho e o 
desconforto de digitá-las utilizando apenas o editor Basic durante 
horas seguidas. Isso sem falar do código inútil como a parte 
montadorae a própria sintaxe da linguagem. Mesmo assim, dizem, 
um bom programa vale o sacrifício! Será? 

Que tal se todo esse trabalho fosse amenizado e esta fosse a 
última vez em que você tivesse que digitar partes dispensáveis? Que 
tal dispor de um editor rápido e versátil e que permita acessar 
qualquer parte da memória que o Basic não alcança? Que tal ter em 
mãos não só um editor, mas um sistema que possa ser expandido à 
medida que surgem as necessidades? 

Amigo leitor, é exatamente isso que propomos neste artigo. O 
MSXDEBUG é um programa que foi idealizado vizando ser 
complementado aos poucos. 

O programa consiste, basicamente, de meia dúzia de comandos 
que formam a base de um sistema integrado. Este sistema contém 
todas as rotinas necessárias à manipulação de arquivos em disco, 
rotinas de reconhecimento de comandos e várias outras sub-rotinas 
que serão úteis no futuro. 

Inicialmente, estão prontas as rotinas que formam a base do 
MSXDEBUG. São rotinas de manipulação de memória como 
DISPIay, EXECutar, MOVer e FILL (preencher com dado valor). 
Além dessas quatro, também temos o DiskSAVE e o DiskLOAD 
(DSAVE e DLOAD, respectivamente) que permitem salvar um 
bloco da memória no disco e carregar QUALQUER tipo de arquivo 
que esteja no disco, seja ele executável, seja ele binário ou mesmo 
o próprio sistema operacional. O último comando implementado é 
o comando DIR que mostra o diretório do disco sem maiores 
detalhes. 

A utilização do MSXDEBUG é bem fácil e acessível, princi- 
palmente àquele que está iniciando no assembler. 

Após a digitação da listagem, salve o programa e rode-o. 

Automaticamente, o seu MSXDEBUG será montado e, caso 
haja algum erro de digitação, será mostrada a linha em que ocorre o 
erro. Não esqueça de iniciar o programa como mostra a listagem, 
pois, se ocorrer erro, será indicada outra linha que não é a correia. 
Ao final do processamento, volte ao DOS c digite MSXDEBUG. A 
tela deverá conter a mensagem inicial e o prompt esperando que seja 
digitado alguma coisa. 

A seguir está uma descrição mais detalhada do que faz cada 
comando. 



As mensagens de erro do sistema são mostradas na hora devida. 
Para vê-las, experimente passear pela RAM do micro a partir do 
endereçolOOH, que é onde os programas com extensão COM são 
carregados. Examine também a área reservada para as variáveis do 
BASIC. Para examinar um programa qualquer, preencha uma área 
de memória com um dado valor (usualmente 0) e use o comando 
DLOAD. Você tem cerca de 50K livres ou mais, dependendo do 
número de drives uúli/ados. Aprenderemos como utilizá-los inte- 
gralmente e também criar programas que os utilizem. 

Infelizmente, esta versão só serve para micro computadores 
equipados com disco. Está sendo preparada uma versão que utiliza 
o cassete e que, breve, será publicada. Nos próximos números, 
começaremos aanalisar as rotinas do MSXDEBUG e aprenderemos 
como implementar rotinas e a utilizar outras. Aguardem as no- 
vidades. 



Sérgio Duric Calheiros é estudante da PUC-RJ, onde cursa 
Engenharia de Computação, desde 1985. Auto-didata em 
Basice Assembler ealgumas outras linguagens, programando 
em micros da linha MSX e PC. 



16 CPU 



IH CLSiKE» DFF 

11B PRIHT "HSXDEDOG 9ERSAQ 1.0" 
128 6ERA1=8 

lia PRINT"PROGRAflA SENDO CONVERTIDO! ' 

148 OPEN 'NSiDEBUG.COH' AS hl LEÍÍ=1 

158 FIELD 61,1 AS At 

148 FOR U=l TO 384 

176 LOCATE 0, 4:PRINT "COHTABEJÍ : ■ ; IZ 

18B soha=b 

198 FOR 31=1 TO 8 

288 READ H:(=VAL['6H'H:i)iSONA=S0NA« 
218 ISET AI=CHRi|í]:PUT hl 
228 NEIT JI 
258 READ t 

248 GERAl=GERAL*SO»A 

258 IF IOSOHA THEN PRIHT 'ERRO NA UNH 

d- i II»:i*2?B:EKD 

24B NEIT II 

278 READ [ 

288 IF Í06ERAL THEN PR1NT "ERRO NO PRO 
GRANA' :EN[> 

298 CLOSE:END 

3BB DATA 03, 89, 87, CD, C9, 88, CD, 9A, 11 12 
318 DATA 88, CD, FA, 88, 7D,2A, 88,80,798 
328 DATA ED,5B,B9,BB,12,A7,E0,52,9B2 
338 DATA 44,4O,0B,EB,54,5D,13,ED,824 | 
348 DATA B8,C9,CD,09,B8,CD,9A,B8,115B ~ 
35B DATA CD, FA, BB, 22, 7D, 00, ED, 50, 963 
348 DATA 39, BB, CD, 33, BB, 38, 1B, 28,542 
37B DATA 8B,8D,E0,5B,89,8D,A7,ED,I834 
38B DATA 52,44,4D,2A,89,BD,89,E5,657 
398 DATA 2A J 7D í BD,B9,Dl.EB,B3,ED,a73 



48B DATA B8, C9,2A, BB, BD,ED, 5B, 89, 1844 
41B DATA BD,A7,ED,52,44,4D,2A,7D,B11 
428 DATA BD,B3,EB,ED,BB,C9,CD,9A,1224 
431 DATA 88, CD, FA, 88. CD, 72,01,03,986 
44B DATA C9,B7,E9,CD,FA,BA,21,91,1B84 
458 DATA BD,11,92,8D,B1 ,24,88,34,268 
448 DATA 2B,ED,BB,CD,9A,BB,2A,B9,991 
478 DATA BD,CD,E9,8B,22,83,BD,FD,89B 
48B DATA 21,15,8B,CD,74,F9,CD,BF,B55 
498 DATA BB,CD,F2,81,CD,E8,BA,11,923 



588 DATA 87 
518 DATA 38, 
528 DATA CD, 
538 DATA 88 
548 DATA 24 
558 DATA li 
548 DATA BB 
578 DATA 11 
588 DATA 11 
598 DATA FD 



85,21,78.85, 
,F2,CD,AF,81 
18, 88,03, BB, 
,C0,7A,82,11 
,BB,CD,BB,82. 
,B8,B8,CD,84 
81, CD, 7A, 82. 
,BB,C3.F2,B1 
BB,C!,F!,B1. 
21 ,28, BB, CD 



CD,41,B2,594 
18,ED,E9,1165 
82,11,08,445 X 
,45,85,00,457 
,01,11,12,473 
,82,C9,11,75B 
3E, SB, CD, 734 
,3E,B8,CD,744 
CD, 81, 82,474 
,74,F9,C3,11B5 



488 DATA C9, 87, 84, 17, 05, CD, 88, 82. 452 
418 DATA CD.1B,BB,C1,18,F4,C3,BB,9B1 
628 DATA B2,B4,18,3£,1F,CD,11,BB,358 
43B DATA 18, F9, 09, 11, 91, 80, 2A, 83, 814 
44B DATA BD, 
458 DATA B4 
448 DATA 83. 



),CD,89,B 
1,17, BE, 05,2 



,13,434 1 
,544 



D,7E,32,B5,BD,CD,58,751 
478 DATA B2,DD,23,2I,B5,BD,CD,FB,893 
4B8 DATA B7,CD,FD,B7,13,2A,B3,BD,475 
49B DATA 23, 22, 83,00, Cl, 18, DF, AF, 828 
7BB DATA 12, DD, 77, 86, 11, 91, BD, CD, 738 
718 DATA 24, 88, 11, 17, BE, 03, 24, 68, 343 
72B DATA DD, 34,88, 2E, FE, 28, D8, FE, 1877 
738 DATA FF, 08, FE, 7F,C8, DD, 77, 88, 1374 
748 DATA C9,84,88,4F,7E,A7,CB,84,783 
756 DATA B9,23,28,F8,EB,78,2B,2B,941 
748 DATA 23,23,lfl,FC,7E,23,44,4F,712 
778 DATA 37,C9,2A,83,8D,A7,ED, 52,926 
788 DATA 22, 83, BD, 09, 2A, 83,68, 19,598 
798 DATA 22, 83, 80, 09, 2A, 83, 80,22,599 
86B BATA 7F,BD,CD,E9,82,0D,39,BB,853 
818 DATA CD, E8, BA, CD, EC, 84, 11, 93, 1854 
828 DATA 85,21 ,77, 65, CD, 41 ,82, DC, 484 / 
838 DATA AF,81,18,EC,2A,81,60,U,437 h 
846 DATA B6,88,A7,ED, 52,22,B1,8D,47B 
858 DATA C9,2A,Bl,8D,ll,fl6,8B,19,435 
348 DATA 22,B1,8D,09,D1,2A,7F,6D,748 
878 DATA 22, 83, 8B.CB, 48, 88, 03, 81, 454 
8B6 DATA 62, 2A, 81, BD, 11, 87, 88,19,235 
898 DATA E0,5B,B3,BD,C3,33,8B,2A,771 



98B DATA 81,8D,ED,5B,B3,BD,03,33,B48 
916 DATA BB, 2A,7F,BD, 22, 83,60,11, 388 
926 DATA 08, B6, CD, 7A, 82, 22, BI, 80, 697 
938 DATA 3E,6B, CD, II, 88, 11, 49, 85, 433 1 
948 DATA C3,24,8B,CD,te,8B,ll,69,444 
958 DATA 85, CD, 24, 68, 84, 88, 11, 7F, 415 
948 DATA 85, CD, 24, BB, 18, F8, CD, 52, 688 
978 DATA B5, CO, 39, 88, CD, £8. 8A, CO, 938 
9B8 DATA 95, 84, 11, Al, 85, 21, 77, B5, 493 
998 DATA C0,61,62,DC,AF,ei,18,EC,948 



1888 DATA 
1818 DATA 
1826 DATA 
1638 DATA 
1848 DATA 
1858 DATA 
1648 DATA 
1878 DATA 
1BB8 DATA 
1898 DATA 



1168 DATA 
1118 DATA 



D1,D1,2A,7F,8D,22,B3, 
03, 48, BB, 01, CO, 46, BB 
32,B5,2A,7F,80,11,6B, 
A7,ED,52,ED,5D,83,60, 
03,33,BB,2A,7F,60,11, 
B8,A7,ED,52,Et,5B,83 
C3, 33, BB, CD, Dl, 62, 28, 
08,46,88, 11,81,88,08 
62, 3E, 10, CD, 11, 68, 03, 
BB,CB,48,B8,86,87,3E 



BD.77B 
03,954 
68,262 -5 
, EB, 1193 
69,641 
,80,958 
11,736 
84,4,35 
39,577 
10,395 



CD,11,8B,1B,F9, 11, 87,86, 522 
CD,7A,82,CD,39,8B,CD,42,B73 



1138 
114B 
1158 
1166 
1178 



1236 
1748 
1258 



DATA 69 
DATA 7F, 
DATA 39 
DATA 48 
DATA 3E 
DATA CD 
DATA 11 
DATA B4, 
DATA 00 
DATA B4, 
DATA 39, 
DATA 8B, 
DATA AC 
DATA 39, 
DATA 46 
DATA 11, 
DATA BB 
DATA 85, 
DATA BB 
DATA DB, 
DATA 48. 
DATA 11, 
DATA 88. 
DATA BS, 
DATA 88 
DATA EA, 
DATA CO 



14B8 DATA 
1416 DATA 
1428 DATA 
1438 DATA 
1446 DATA 
1458 DATA 
1468 DATA 
1476 DATA 
14BB DATA 
1498 DATA 



DA, 42, 84, CD 

85, CD, 24,88 
B5, CD, 24, BB. 
, BB, 00, DF, 82 

11,81,88, 
,10, CD, 11, BB 
,48,66,66,87, 
,88,10,F9,U 

82, CD, 39, 8B, 
,42,83,88,62 
11, 49, 85, CD. 
,68,00,53,83 
11, BB, BB, 00, 
,82,3E,1E,CD 

86, CD, Dl, 82, 
BB, 11, 81, BB 
7F,B5,CD,24, 
CD, 48, BB, 86 
CD, 24, 68,11, 
,CD,7A,B2,CD, 
03, CD, DF, 82, 
,8B,11,B1.B8 
B3, 85, CD, 24, 
, CD, 48, BB, 86 
CD, 24, BB, 18, 
, CD, 84, 82. CD, 

83, CD, 48, 68, 
84,82,00,19, 



CD,11,88, 
BB, 08, 18 
83,BD,il, 
BB, CD, BB 
7A,B2,C3, 
F5,CD,40 
77,E5,26, 
3E,8D,CD, 
£1,22,B3, 
3A,63,8D 



,76,64,11,647 
,11,393 
,1B,FB,C3,843 
,28,11,00,748 
CD, 7A, 82, 422 
,C3, 39, 68,587 
3E,1C,CD,568 
,07, 80, CD, 522 
C3, EA, 83, 839 
,84,00,76,917 
; 24,B6,C3,578 
,D8, 06,48,836 
7A,B2,CD,57B f 
11,68,03,694 
28, 12, CD, 747 
00,34,82,452 
66,03,39,453 
,87, 1 1 ,33,452 
FB, 11, 67, 545 
,39, BB, 03, 797 
28,12,00,912 
CD, 7A, 82, 422 
BB, C3, 39, 657 
67,11,70,448 
F6, 11, 87, 545 
39.86.03.807 
11, BB, 60, 542 
02,3E,1F,824 



03,39,88, 
,0B,26,7F 
88,88,19. 
.82,11,83 
B9,B2,FE, 
BB,F1,2A 
81.80,22, 
11,88,00 
BD,3A,81 
,95,6F,3E. 



,00,46,765 
,BD,22,467 
,22,7F,355 
,88,00,461 
28,D8,1B8B 
,83,86,962 '* 
83,80,716 
,66,82,526 
,8D,6F,714 
86,95,681 



1588 DATA 
1516 DATA 
1526 DATA 
153B DATA 
1548 DATA 
1556 DATA 
1568 DATA 
1578 DATA 
1588 DATA 
159B DATA 



47,3E,1D, 
00,39,08 
D8,4F,SE 
61,38,82, 
B9,79,BB, 
41, BB, 67 
21,2S,8E, 
Fl.CB.ll 
EB,0A,CD, 
25, BE, 23 



00, 11, BB, 
,3E, 10,09 
,64,69,79, 
04,2B,4F 
FE, 61, 38, 
,09, CD, CE 
77,F.5,CD, 
BB, CD, 39 
CE,84,38, 
77,23,34 



1488 DATA 
1418 DATA 
1428 DATA 
143B DATA 



CD.4B,6B,i 

FA, 88, 70, 
2A, 61,80, 
00,11,86 



Fl.CD.ll, 
2A,85,BD 
22,83, BD, 
,C0.BB,82 



1B,F9,646 
, FE, 38, 866 
D8, FE, 1235 
,3E,46,412 
83,FE,11B6 ' 
,64,08,1288 
46, BB, 728 
,88,00,952 
FB,21,994 
6t,Fi,539 



06, CD, 959 

,77,E5,917 li, 
3E,60,437 
,E1, 22,710 



CPU 17 



164B DATA 
1658 DATA 
166B DATA 
1678 DATA 
1488 DAI A 
169B DATA 
1700 DATA 
1718 DATA 
172B DATA 
1738 DATA 
174B DATA 
1758 DATA 
176B DATA 
1778 DATA 
178B DATA 
179B DATA 
18BB DATA 
1811 DATA 

is;e DATA 

1B38 DATA 
184B DATA 
1858 DATA 
1868 DATA 
1878 DATA 
I DATA 
:89í DATA 
198B DATA 
1918 DATA 
1928 DATA 
1938 DATA 
194B DATA 
1958 DATA 
196B DATA 
197B DATA 
1988 DATA 
1998 DATA 
2888 DATA 
281 B DATA 
282B DATA 
2B3B DATA 
284B DATA 
2B5B DATA 
2868 DATA 
28 7B DATA 
288B DATA 
2098 DATA 
21 BB DATA 
2118 DATA 
! DATA 
2138 DATA 
2148 DATA 
2158 DATA 



?3,BD 
3A,B1 
A7.I8. 

24, bb 

1E,C?, 
BD,95 

ÍTj 
H,H 
18,88, 
»,1F 

IC.1C, 

ai .sc 

BI. DD, 
I3,£A 
14,31 
B3.AA 



11, 69, B5, CD, 
,BD,6F,3A,83 
89,47,11, 7F. 
,18,Fa,CD,39. 
3A,81,8D,6F, 
,A7,C3,47,3E ; 



17, BE. 
Ffl.CD 
EB,BD , 
li ( K 
B7.ll 

K,H 

32, C7. 
BB, 11 
12.C3 

18. E5 
DE, CD, 
46,87. 
22,89, 
87, CD. 

16, n, 

11,93 

11, SC, 



1B,F9,C9,BB 
,1C,1C,1C,1C 
,1F,1E,1D,1C. 
,1E,)D,1C,88. 
,88,10,10,10, 
,B2,BB,B1,B6 
81,14,82,83. 
,83,32,84,82 
,83, 38, 83, 8E, 
, 83,63, 83, AA 



24, BB, 523 

,80,95,662 

B5,CD,44Í 

,8B,3E,64ó . 

3A,B3,729 

1C,CD,895 



IB, 4C,6B8 

IC, 88,153 
8B,1B,1B5 
,88,1^167 l> 
BB, ES, 372 
,81,CF,71B 
83,08,643 
,84,32,358 
83, EA, 496 
,83,21,484 



2i, ae 

BE ,8F, 
E5,D5 
FE, 82, 
Cl, Dl 
CD, 66, 
06, 2B 
H,CB, 
19, BC, 
CD, 66, 
86, 2A, 
CD, 33, 
BB, BI. 
88. CD, 
58,80. 
U,3C, 
8D.E0 
E5,CD, 
B6,0A 



86,8B,36,3F 
,46, 87, CD, 4A 
BE, 19, 8C, CD 
,8B,8E,11,CD. 
B6,BB,C2,86. 
, CD, 18,88,06 
BD,11,BC,BD : 
,59,8C,CD,24 
CD, 8S, 88, Cl 
, CD, 18, BB, 86 
9A, 88, CD, 86, 
,CD,9A,88,CD. 

ll,5C,B8v 
3F, 86, 11,45 
CD, 72,87, ED, 
,8E,19,BC,CD 
88, CD, 4B, 86, 
,B8,19,EB,18 
CD,85,B8,D7, 
,C5,BE,14,CD 
11, 18, BC, CA, 
,E1,B7,C9,CD 
B7,CD,4A,87, 
,B3,CD,3E,B7 
85,87,11,68, 
,C3,B5,88,CD 

87, CD, 72,87, 
,B9,e0,E0,5B : 
BD,38,1B,88, 
,Be,8B,ED,B8 : 
2B,B7,2A,B9, 
,19,22,89,80 

88, C3, 18, 87, 
,5B,89,8B,A7 
DB,B4,CD,F6, 
,CB,3A,CB,1B. 



23,18,222 
,87,11,868 
85,88,461 
85,88,358 
06,11.621 
,83,AF,516 
CD, 24, 721 
,0B,8E,395 
B7,C8,993 
,83,18,518 
09, CD, 1142 
,FA,BB,939 
CD,4fl,572 

BC, C2,573 
5B,B9,8BB 
,85,88,487 
D1,C8,793 
,EA,D5,892 
D1,C9,832 
,85,88,883 
B6,BB,52B 
,B6,B6,1484 
CD,3F,868 
,11,5C,424 
88, BE, 376 
,A5, 88.615 
CD,5D,93B 
,8B,8D,67e 
11,88,487 
,U,5C,631 

BD, 1 1,464 
,18,09,578 
2A,BB,516 
,ED,52,977 
86, Dl, 1325 
18,FA,773 



2160 DAIA 13,CD,33,0B,D8,11,D3,BB,733 
2178 DATA C3, 86, BB, 21, El, 80,86,88,580 
2188 DATA 36,3F,23,1B,FB,11,BB,8D,636 
2190 DATA BE, 19, 8C, CD, 85, 88, 11. 5C, 378 
2288 DATA BB, BE ,11 ,C3,B5, 80, 1E, 00,261 
2210 DATA BE, 1B, CD, 85, 88, FE, 82, CB, 787 
2228 DATA CB,3C,CB,1D,C9,E5,D5,C5,1335 
2238 DATA BE, 14, CD, 85, 88, 3C, 11, C3, 518 
2248 DATA 8B,CA,B6,BB,C1,DI,E1,C9,1B58 
2258 DATA E5,D5,C5,0E,10,CD,05,0B,S79 
226B DATA B7,Í1,F3,8B,C2,B6,BB,C1,B58 
227B DATA Dl,El,C9,E5,D5,C5,eE,15,1389 
228B DATA CD, 05, BB, B7, 11, 28, BC, C2, 648 
2298 DATA B6,0B,C1,D1,E1,C9,E5,D5,1287 
23B8 DATA C5. BE , 13, CD ,85, 88, Cl , Dl ,842 
2318 DATA £1,C9,21,EC,BD,E5,D1,13,1165 
2328 DATA 36,8B,8!,18,B8,ED,BB,21,525 
2338 DATA EB, 0D, 11, 5C, 80, 01, 25, 88, 384 
234B DATA ED,B8,11,5C,8B,C9,21,17,779 
2358 DATA BE, 11, El, 8D, BI, BB, 88, ED, 518 
2368 DATA EB,C9,21,17,BE,11,B5,8E,4B3 
2370 DATA 81,88,BB,ED,BB,3E,2E,12,54B 
238B DATA 13, 81, 83, 88, ED, BB, AF, 12, 629 
239B DATA C9, ED, 78,86, 00, 3£, 28, 32, 719 
24BB DATA 88, F3, 21, 91,80, 11,92,80,784 
2418 DATA 01, FF, 88, 36, 88, ED, BB, 21, 756 
2428 DATA 17, BE, 54, 50,13,36,28, 81, 328 
2438 DATA 06, 88, ED, BB, CD, 72, 87, AF, 92 5 
2440 DATA 32,A9,FC,ED-7B,06,B8,CD,1842 
2458 DATA FA ,8A,CD, BF ,0fi, ! 1 , 60.8C ,i!6 
246B DATA CD, 24, BB, CD, 18, BB, C3, 28, 719 
2478 DATA 88, ED, 78, 86, 88, CD, 18,88,614 
2488 DATA C3,28,88,CD,FA,8A,FD,21,9B4 
2498 DATA AB,F9,DD,21,3E,B0,CD,74,1B46 
2508 DATA F9, CD, 18, 8B,C3, BB, 88,11,781 
2518 DATA B6, 80, CD, 89, 88, AF, 12,11, 627 
2528 DATA B6,BD,CD,24,eB,ll,lB,BB,499 
2538 DATA C3,24,BB,AF,ED,6F,FE,8A,1629 
2548 DATA 38, p2,C6,B7,C6, 38, 12,13,546 
2558 DATA C9, 21, B5,BD,23,CD,FB,B7, 878 
2568 DATA CD,FB,B7,2B,CD,FB,B7,C3,1164 
2578 DATA FB,87,88,1D,1D,10,1D,BB,374 
2588 DATA CD, 1B, BB, 11, 5C, BC, CD, 24, 602 
2598 DATA BB, CD, 62, 8A, CD, 27,89, FE, 831 
260B DATA 2B,2B,ED,A7,28,EA,CD,4E,1B33 
2618 DATA 88, 78, 21, 82, BC, 23, 23, 18, 389 
2628 DATA FC,2B,2B,7E,23,66,6F,CD,917 
2638 DATA 4D,88,C3,C9,87,E9,22,87,89B 
264B DATA BD,ED,5B,87,Bfl,21,D2,BC,744 
265B DATA B6,81,E8,7E,EB,A7,28,24,846 
266B DATA FE, 28, 2B, 28, FE, 61, 38, 82, 767 
2670 DATA 04,28,6E, 23, 13,28, E8,7E,891 



DATA A7,23,20,FB,84,7E,FE,FF,!124 
DATA £D, 58, 87, BD, 28, DE, 11, 31, 794 
DATA BC,C3,06,06,7£,21,3I,8C,444 
DAIA EB,A7,C2,B4,BB,EB,C5,21,1B78 
DATA 25, BE, 81, 28, 88, EB ,£D, BB, 732 
DATA C1,C9,CD,27,B9,A7,C8,11,1Í23 
DATA 8A,8B,C3,B4,BB,CD,9A,88,728 1 
DATA CD. 86, 89, CD, 9A, BB, CD, FA, 1178 
DATA BB,22,89,flD,E5,CD,9A,88,78H 
DATA CD,FA,BB,22,8B,BD,D1,CD,1B63 
DATA 33, 8B, 11, 9E,BB, DA, 86,88,483 
DATA C9, CD, 9A, BB, CD, FA, BB, 22,1865 
DATA e9,BD,CD,9A,88,CD,FA,B8,Wfl 
DATA 22,8B,eD,ED,5B,89,BD,CD,B49 
DATA 33,88,08, 11, 9E, BB, C3, 86,657 
DATA 8B,C2,FA,B8,3£,iD,C0,il,776 
DATA BB. E5, 22, 85,00, CD, E7, 87, 863 
DATA El, O, CD, 27, 89, 11, BA, BB, 845 
DATA CA, 86, 0B, CD, 38, B9, 21, 88, 525 
DATA BB, 22, BD, 80,21,12, BE, 7E, 379 
DATA 7E,A7,2fl,23 ) FE,2B,2B,lF,725 
DATA CD, 65, 89, 11, 9E, BB, DA, 16, 725 
DATA 08, CD, 7B, 89, 23, 18, £8,21,672 
DATA 25,BE,7E t A7,CB,B6,28,FE,B36 
DATA 2B,C0,23,7E,1B,F9,C9,2A,893 
DATA BD,0D,C9,11, 12, BE, 7E, FE, 784 
DATA 3B,23,2S,FA,2B,7E,A7,28,749 
DATA 8F, FE, 28, 28, BC, FE, 61, 3B, 768 
DATA 82, D6, 28, 12,13,23, 18, £0,531 
DATA 2B,AF, 12, 23, 81, 28, 88,11, 321 
DATA 25, BE, ED, BB, C9, 47, FE, 38, 1838 
DATA D8, 3E,46,B8, 08,78, FE, 3A,11BB 
DATA 38, 85, FE, 41, DB,D6, 17, 06,184 7 
DATA 2B,A7,C9,E5,21,8D,BD,ED,1853 
DATA 6F,23,ED,6F,E1,C9,CD,27,1164 
DATA B9,B6,88,7E,A7,CA,27,BA,567 
DATA FE,2E,CA,12,8A,11,17,BE,5B4 
DATA 7E,4F,A7,2S,27,FE,2B,2B,777 
DATA 23, FE, 2E, 28, ÍF, FE, 61, 38, 813 
DATA 82, D6, 28, CD, 04, B9, 12,13, 711 
DATA 23,18,E5 ! 6ó,B3,7E,FE,2B,7Bl 
DATA 28,5E,A7,2B,5B,FE,2E,28,772 
DATA 29,C3,12,8A,3£,2B,12,13,395 
DATA 1B,FA,7E,FE,2E,2B,18,8B,759 
DATA 86, B3.IB, 44, 4F,E5,D5, 11,639 
DATA AA, BB, 21, 58, BA, 7E, 89, CA, 817 
DATÃ B6,8B,A7,23,28,F7,D1,E1,932 
DATA 79, C9, 23,86, B3,7E,A7,2B, 699 
DATA 21,FE,28,2fl,lD,F£,2B,28,714 
DATA 1F,A7,2B,1C,FE,61,38,B2,675 
DATA D6,28,CD, 04,89,12, 23,13,744 
DATA 7E,18,EA,FE,2B,28,8F,A7,8B4 



18 CPU 



12H DATA 28,8C,11,AA,8B,C3,86,8B,462 
321B DATA 3E, 20,12,13, 18, Fft, 11,25,451 
3228 DATfl BE , BI , 2B , 80 r ED , BB ,C9 , 21 ,494 
3238 DATA 05,0E,7E,11,AA,BB,FE,28,629 
3248 DATA Cft, 86, BB, A7, CA, 86, BB, 11, 422 
3258 DATA 17, BE, BI ,88, BB, EB, BB, 23, 494 
3268 BATA 81,B3,BB,ED,B8,3E,1D,CD,713 
327B BATA 11. BB, 11, 85, BE, C3, 24, BB, 386 
328B DATA 2C,2E,2F,5C,7C,3F,2A,3B,517 
329B DATA 3A,5B,50,2B,3D,22,BB,CD,585 
3388 DATA ÍB,8B,21,25,aE,22,BF,BD,389 
3318 DATA 3t,2B ,3E , 3E , CD, i 1 , BB, 3E , 585 
3328 DATA 5F,CD,ll,88,:D,CD,BA,FE,lBe2 
333B DATA BD, 28, 42, FE, 10,28,84, FE, 708 
3348 DATA 88,2fl, 15, CD, DD, BA, A7, 28, 784 
335B DATA EB,2A,8F,8B,2B,22,8F,8D,666 
3368 BATA 11, F3, BA, CD, 24, BB, 1B, D7,761 
3378 DATA 47,FE,28,3B,D7,3E,ft3,BS,1837 
338B DATA 78, 38, Dl, CD, DD, BA, FE, 20, 1107 
339B DATA 30,CA,3E,1D,CD,11,0B,78,694 
3488 DATA CD, 11, 0B,2A,BF, 00,70,23,578 
341B DATA 22,8F,BD,ia,B2,3E,lB,CD,688 
3428 BATA ll,aB,3E,28,CD,li,aB.2A,397 
3438 DATA 8F,BD,34,BB,C9,1E,FF,8E,718 
344B DATA B6,CD.B5,BB,B7,2B,F6,FE,939 
345B DATA IB,CA,B3,B7,C9, 11 ,25, BE, 684 
3468 DATA 2A,8F,8D,A7,ED,52,7íi,C9,181B 
3478 DATA 1E,FF,BE,06,CD,B5,BB,B7,698 
348B DATA 28,F6,C9,1D,1D,20,2B,1D,638 
3498 DATA 1D, 88, 21, 47, BB, 11, 74, F9, 526 
358B DATA fll,34,B8,ED,BB,C9,CD,18,896 
3518 DATfl BB,CD,24,BB.C3,C9,a7,3£,728 
3528 DATA BC,FD,21,BC,88,C3,74,F9,1B54 



353B DATA D5,ll ,21 , BB, CD, 24 ,06, Dl, 735 
354B DATA C9,8D,BA,B8,EB,7E,EB,A7,987 
3558 BATA CB,FB,21,BC,88,CD,74,F9,Í252 
356B DATfl 13,18,F1,7C,92,CB,7D,93,181B 
3578 DflTfl C9,FD,21,E6,89,C3,74,F9,1286 
358B DATA FD,21,33,8A,C3,74,F9,F3.1150 
3598 DATfl ÊD,73,99,F9,31,F0,FA,88,1381 
3600 DATfl DB,AB,32,9B,F9,E6,FC,03,1534 
361B DATfl A8,ea,CD,96,F9,B8,3A,96,1881 
3628 DATfl F9,D3,A8,BB,ED,7B,99,F9,1398 
3638 DATfl C9,FD,E9,C9,88,B8,BB,Bfl,B88 
3640 DATA BB,8B,8B,DB,fl8,E6,Fa,D3,lB6S 
3658 DATA A8, DD, E9, 41, 72, 71,75, 69, 1136 
366B DATfl 76, 6F, 28, 49, 4C, 65, 67, 61, 775 
3678 DATA 6C, BB, 44, 61, 64, 6F, 73, 20, 631 
36B8 DATA 69, 6E, 73, 75, 66, 69,63, 69,858 
369B DATA 65, 6E, 74, 65, 73, 88, 44, 61,786 
37B8 DflTfl 64, 6F, 28, 69, 6C, 65, 67, 61, 757 
3718 DATA 6C, BB, 4E,6F, 60,65,28, 69, 644 
3728 DATA 6C, 65, 67, 41, 6C, BB, 53, 65,781 
373B DATA 6D, 28, 61, 72, 71, 75, 69, 76, BBS 
3748 DflTfl 6F,73,BB,44,69,72,65,74,73B 
3758 DATA 6F, 72, 69, 6F, 28,63, 68, 65, 777 
3768 DATA 69,6F,BB,4D,65,6D,6F,72,72B 
3778 DATA 69,61,28,44,69,73, 78, 6F, 777 
37B8 DftTA 6£,69,76,65,6C,2B,69,6E,789 
3798 DATA 73, 75, 66, 69, 63, 69, 65, 6É, 354 
388B DATA 74,65,BB,4E,41,6F,2B,63,634 
3818 DATA 6F, 6E, 73, 69, 67, 6F, 28,66,789 
3828 DATA 65, 63, 68, 61, 72, 2B,6F, 28, 690 
3S3B DATA 61, 72, 71, 75, 69, 76, 6F, BB, 775 
3848 DATA 45,72, 72, 6F, 28, 64, 65,28, 673 
385B DATA 6C, 65,69, 74,75,72,61,8B, 758 



2, 4F, 28, 64, 65,28, 473 



■:>87B 


DA 1 > 


67, 72, 61, 74, 61, 63, 61, 6F, 636 


3f>Sfl 


DATfl 


0B,43,6F,6D,41,4£,64,6F,785 


'99E 




28, 69, 6£ ,45, 78,49, 73. 74,884 


■ Wt 


D«lH 


65, 6£, 74, 65, 88, 41 , 72,71 ,728 


WH 


QiHA 


75, 69, 76, 6F, 28, 69, 4E, 65, 799 


:t;t 


DAÍ A 


7B, 69, 73, 74, 65, 6E, 74 ,65, 884 


;'93U 


DA I P 


88,28,28,00,53,49,53,88,383 




' 


4 D, 53, 56,20,44,65,62,75,664 












28 31 2E 30 BD 0A 43 58 345 




U A 


55 , 2B,2D , 28 , 38 , 31 ,2F , 38 , 394 


3^83 




39,08,03,07,22, 81,03, BI, 314 


3998 


!;•<!- 


66,B1,73,01,AF,B5,7D,86,538 


4803 


SnTfi 


01,86,88,88,88,88,00,08,7 


4013 


Jh'H 


BB, BB, 88, BB, BB, 08, BB, 88,0 




! li 


88, BB, 88, 88, 88, BB, 88, 08,0 


4833 




BB, 80, 80, 88, 88, 88, B8, BB, 8 


434B 


[ifl : a 


08, 88, BB, 00, BB, 80,08,88, 8 




DA!A 


08,00,88,88,88,88,88,00,0 


40ítf 


MTfl 


BB, 08,80,08, Bfl, BB, 80,88,8 


4B.'fl 


DATA 


88,80,88,80,08,08,08,08,0 


4333 


DíiH 


B0,88,44,4F,53,8B,4D,4F,386 


489B 




56, 45, 00, 46, 49, 4C,4C, BB, 458 


4; M 




45,58,45,43,88,44,49,53,517 




*^'' 


58,80,44,49, 52,08,44,53,454 


4j 21 




di rjl a ^ aa a a tr At a> ^ao 
11 , Do, 13, HM, 11 ,iL,lr ,11,31(0 


4130 


BATfl 


(4,lê,FF,H,ÍB,6I,H,H,J23 


4;48 


DATA 


271(83 



CONVITE AOS NÃO SÓCIOS DO MISC 

Seja você um usuário profissional ou de lazer, convidamos a participar do melhor clube de MSX do Brasil. A proposta funda- 
mental do MISC é dar apoio a nível de informação, serviço e produto. 
Esta retaguarda é proporcionada por uma jovem equipe de especialistas em MSX. O Jornal do MSX é uma exclusividade dos 
associados Para ingressar no MISC você paga uma taxa única de Ncz$ 6,50 até o fim do congelamento. 
Pague com cheque nominal a EMBASS EDITORA LTDA.,ou através de depósito no BRADESCO agência 0108 conta 141.184-5 
Ao fazer sua inscrição informe-nos se quer receber sua cole çaTo- brinde de jogos em K7 ou disco 5 1/4. 

MISC MSX INTERNATIONAL SERVICE CLUB 
Rua Xavier de Toledo, 210 - cj . 23 
01048 - S5o Paulo ■ SP - FONE:(01 1) 34-8391 e 36-3226 
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DUMP DE TELA GRÁFICA 

JÚLIO VELLOSO 




Para o usuário que não possui uma impressora colorida, desen- 
volvi uma rotina que imprime uma tela gráfica com diversas 
tonalidades de preto, dando um aspecto muito bonito a sua tela, que 
antes, com os "dump's" comuns, sri aparecia com apenas uma cor e, 
em certos casos, quando o desenho exigia várias cores, ficava em 
parte cortado, perdendo muito na sua beleza. 

A ROTINA 

A rotina feita em assembler, ficando de BOOOh até BFE1H, im- 
prime uma tela gráfica (modo 'SCREEN 2') em tamanho dobrado, 
utilizando 1 5 matrizes 2x2, substituindo as 15 cores domicro MSX 
por suas respectivas tonalidades de preto, como se fosse uma 
televisão preto e branco. 

Como a impressora GRAF1X MTA possui 480 pontos para a 
impressão gráfica e a tela no modo gráfico possui 256 pontos na 
horizontal, a tela impressa ficaria com 512 pontos, cortando, por- 
tanto, 3.072 pontos de sua tela. Se a impressão fosse correia, os 
usuários desta impressora ficariam prejudicados. Então, eu optei 
pela impressão deitada, que são 192 linhas que impressas, por esta 
rotina, ficaria com 384 pontos podendo, portanto, ser efetuada. 
MONTANDO A ROTINA 

Para entrar com a rotina, digite o programa Basic da listagem 1 
e execute-o com o comando RUN. O programa irá montar a rotina 



nos seus respectivos endereços e, em seguida, gravá-la cm formato 
binário. Feito islo.o programa Basic não lhe será mais útil, podendo, 
portanto, ser apagado. Antes, é aconselhável testar a rotina. 
UTILIZANDO A ROTINA 
Para testar a rotina, enlre com a listagem 2 e o programa montará 
uma tela com todas as cores do micro e em seguida efetuará a sua 



Para imprimir outras telas gráficas, como as geradas pelo GR A- 
PHOS III, por exemplo, ou pelo comando BSAVE "NOME", em 
disco, entre com o seguinte programa em Basic: 
10 SCREEN 2 

2 0BLOAD "NOME DA TELA" , R (ou , S - conforme O caso) 
30 BLOAD "DUMP. EXE ",.R 

E bons desenhos! 



Júlio Velloso é estudante da UCP, na qual cursa o 4" período 
do Curso de Ciência da Computação. Programa em Basic, 
Assembler, Pascal e DBase III, há 4 anos, em equipamentos 
que utilizam o microprocessador Z80 e PC, principalmente o 
MSX. 

Éautor do programa utilitário de cópia 1JKP, comercializado 
inicialmente pela Ciberne e do Sistema Operacional BKP 
Disco, comercializado pela Paulisoft Informática. 
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28 ' Prograia para npresao de tela 
38 ' 

4B 1 Por: Julio Velloso 

58 1 

bt F0RI=lTO481:REftDflt;P0KE SHBDFF-H ,YAL 
f "4H'+At ! : HEXTI 

7B BSAVE ' DUMP . EIE 1 , SHBE8B, iHBFEl 
88 END 

ÍB8 DATA DB,A9,47,Ei,3B,4F,CB,39,CB,39, 

7B s E6,F*,Bl J D3 f A8,3E,lB f CD f ft5 í B í 3E p 41,C 

D,A5,B,3E,8,CD,A5,B,CD,61,BF,3A,EA,F3,2 

l,CE,BF,Ef>,F,5F,U,B.lVE,21,CE,BF 

118 DATA 77,i,2e,21,F8,8,C5,6,8,E5,C5,C 

D,5B,RE,3A,EB,BF,3C,32,E8,BF,C1,E1,1B,F 

B,ftf,32,EB,BF,ll,B,e,fl7 í ED,52,Cl,18,Ee ) 

C3 , Bí ,BF ,t ,CB, 1 I ,F8 ,B, CD ,9C,BE ,ED 

128 DATA 8E,BE ,E5 , D5, C5, CD ,AD , BE t Cl , Dl f 

El,7D,E6,7,FE,7,2B,l,19,23,lB,Ei> f C9,3E, 

lB,CD,A5,8,3E,4B,CD,ft5,B,7B,CD,A5,B,7A, 

CD,A5,B,C9,C5,E,B,È,8,CB,17,CB 

138 DATA 19,1B,FA,79,C1,C7,CD,A2,BE,DB, 

9S,C9,7D,F3,D3,99,7C,EÍ,3F,D3,99,FB,C9, 

F5 ) 3A 1 EB,BF,A7,CA,CA,BF, 47,F1, 17,1B,FD, 



CB,7F,28,17,£B,21,B,28,19,CD,9C,BE,Eii 

148 DATA F,2í,CE,BF,5F,li,B,l?,7£,4F,CD 

,E5,BE,C9,EB,21,B,2B,19,CD,9C,8E,EÈ,FB, 

1F,1F,1F,1F,1S,E3,AF,C5,CB,59,2I,4,CB,B 

F,lB f 2,CB f FF,CB,51,2B,4,CB ( B7,ia,2,CB 

158 DATA F7,4F,3A,DE,BF,A7,CA,C2,BF,47, 

79,1F,1F,18,FC,4F,FD,7E,B,81,FD,77,8,FD 

,23,AF,C1,CB,49,26,4,CB,BF,18,2,CB,FF,C 

B,41,2B,4 f CB J B7,18,2,CB,F7,4F,3fl 1 DE 

1*8 DATA BF,A7,CA,C6,BF I 47,79,lF,lF,ie, 

FC, 4F [ F0,7E,B,Bl,FD,77 1 8,FD,23,3A f DF,BF 
,3C,32,DF,BF,FE,CB,28,l,C9,ftF,32,DF,BF, 

FD, 21,0 1 4B,3A,DE ) BF f 3C ) 32,DE,BF,FE,4 
178 DATA 28, 15, C9,E5,D5,C5, 21, 8,48,34,8 
,n,l,4B,l,a,38,ED,BB,Cl,Dl,El,C9,AF,32 
, DE, BF ,D5, C5, 1, SB, 1,FD, 21, 8,48,11,86,1, 
CD f 7B,BE r FD,7E,B f CD f flS,B,CD,fl7 

18B DATA FF,FD,23,B,7B,B1,2B,FB,3E,A,CD 

,A5,8,Cl,Dl,FD,21,B,4B,ED,il,BF,C9,CD,B 

7,B,D8,6,B,FD,E1,1B,FC,DB,A8,E4,FB,D3,A 

8,3E,A,CD,A5,B,3E I D,CD,A5,B J C9 

198 DATA 79,C3,9,BF,79,C3,37,BF,F1,C3,B 

A, BE, 7, F,fl, 9, 7,5,0,8^,6,4,2,6,3,1,8,8, 

8,8,8 



;8 ' PROSRAftA TESTE 
38 ' 

48 COLORl,I5,15iSCREEN 2 
58 X=2B:¥=1B 
6B F0RO1TQ15 

78 LINE(K,Y)-(I*36,Y+24),C,B:PAlNT(Ma 
,WB),C 

8B I=X+8B: IFX>lBBTHEWV=V+32i X=28 
98 NEXT C 

188 BLOAD'DUMP,E(E",R 



^^^ ^^^^^^^^^ 




THUNDEfíSOFT 



THE NAME OF MSX 

PEÇA O NOSSO SUPER 
CATÁLOGO GRÁTIS! 
TEMOS APPLE* TAMBÉM! 



JOGOS _ 1 .00 
APUCATIVOS _ 
COHADOflEB _ 
CP«. 3000 

preço do naco _ 

PREÇO DA FITA _ 2ÍQ 
CORREIO^ 2,60 
ENTREGA EM 24 HORAS + 
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LANÇAMENTOS DO MÊS 

MSX BOOK II - EDTRONIC - SCED 
SUPER ASM ( CART C./LED ERESET ) 



A cada 5 programas escolha 1 grátis 
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REDEFININDO O 
MSXWORD 3.0 

GUSTAVO F.BAYER 



Uma das grandes vantagens dos editores de texto baseados 
no clássico TAS WORD inglês é a possibilidade de total redefinição 
dos caracteres impressos na tela, assim como dos respectivos 
códigos gravados e remetidos à impressora. Sua mais recente versão 
comercializada no Brasil, o MSXWORD 3.0, apresenta rotinas que 
facilitam a redefinição dos códigos emitidos por cada caracter, mas 
a alteração dos caracteres na tela continua sendo pouco aproveitada 
pelos usuários, já que o acesso à sua tabela binária é trabalhoso. 

O programa aqui apresentado busca facilitar o manuseio 
conjunto de todas as tabelas referentes a cada caracter. Ele é 
compatível apenas com o MSXWORD 3.0, já que essa versão, para 
facilitar a carga do programa, alterou os endereços de suas rotinas 
em assembfer. 

Inicialmente, o programa pede que seja informado ocaracter 
ou ocódigo ASCII a ser pesquisado. A seguir, cleapresenta, de cima 
para baixo, os 8 bytes que definem o caracter na tela de 64 colunas, 
os 8 bytes que definem o caracter na janela de 32 colunas, e, ao Final, 
os códigos gravados e emitidos à impressora. Nessa tela de 
pesquisa, os bytes são apresentados de forma simplificada, elimi- 
nando- se os"zeros", para facilitar o reconhecimento do desenho do 
caracter. Os códigos para gravação e impressão são apresentados 
em sua notação decimal. 

A pesquisa pode continuar através das teclas de direção: a 
tecla para cima avança ao topo da tabela (retomando em um 
caracter por toque); a tecla para baixo desce na tabela (avançando 
um caracter por toque); e as teclas esquerda ou direita solicitam a 
informação de outro caracter ou código ASCII a ser pesquisado. Os 
caracteres ASCII 208 a 223 não são apresentados por não estarem 
disponíveis para redefinições. 

Ao pressionar-se a tecla INS, surge a tela de trabalho, onde 
os bytes que definem o caracter na tela são apresentados em sua 
notação binária completa, onde os algarismos "1" representam os 
pontos que serão impressos na tela. Basta, então, acrescentar 
ou retirar tais algarismos para modificar-sc o caracter no 
MSX WORD 3.0. 

Alguns cuidados, entretanto, devem ser tomados. Os ca- 
racteres da tela de 64 colunas ocupam apenas as quatro colunas à 
direita dos seus bytes. Para manter uma separação entre os 
caracteres, apenas as três últimas à direita devem ser utilizadas. 
Na tela de 32 colunas, os caracteres ocupam todo o byte, mas apenas 
os seis à esquerda devem ser utilizados para manter-se o afas- 
tamento. Cuidado com ocaracter ASCII 1 97, que define o cursor da 
janela de 32 colunas. 

Os códigos para gravação c impressão são alterados com a 
simples troca do respectivo número em notação decimal. É impor- 
tante observar aqui que cada caracter normal (sem o GRAPH 
acionado)emÍte uma sequência de três códigos. Essa quanúdade de 



códigos é suficiente para acionar-se a maior parte dos comandos de 
uma impressora. 

Isso permite utilizar caracteres praticamente nunca usados 
em textos, especialmente os do teclado CODE (Hotbit) ou shifi/ 
RGRA (Expert), reservando-se os caracteres obtidos no 
MSXWORD 3.0 com GRAPH acionado, e que emitem quatro 
códigos, para os comandos mais extensos. 

Apenas uma observação: deve-se procurar incluir na 
sequência dos códigos de controle da impressora o código 32 
(espaço). Isso permitirá incluir o respectivo caracter cm qualquer 
espaço da linha, sem perder o alinhamento à direita na impressão 
(principalmente quando se trabalha com todas as 64 colunas de 
texto). 

Combinando-se esses recursos de redefinição, toma-se 
possível criar caracteres de controle simbolizando na tela sua 
função, facilitando assim o controle visual do texto na tela. 

Uma vez efetuadas as modi ficações desejadas, basta colocar 
o cursor na última linha alterada da tela de trabalho e acionar repe- 
tidamente a tecla de função F2 ali. aparecer a mensagem de erro. 
Com isso, as alterações estarão registradas na memória. Para retor- 
nar ao programa, aciona-se a tecla de função Fl, pedindo, então, a 
pesquisa de um novo caracter ou código ASCII ou simplesmente 
acionando-se <RETURN>. Para voltar ao MSXWORD 3.0 basta 
acionar ESC na tela de pesquisa. O último passo seria fazer uma 
cópia das alterações, através da opção "C" "do menu principal do 
MSXWORD 3.0, sem esquecer-se de ter feito antes uma cópia de 
segurança do MSXWORD 3.0 original. 



DICAS PARA A MTA 


32^7,65,0 


Sequência de códigos que simula o BS. 
Funcionamento: anula o avanço do papel no 
salto de linha; com isso, a linha seguinte será 
impressa sobre a anterior, permitindo a super- 
posição de caracteres (p.ex./e ■ para formar í), 
sublinhamento e duplo (triplo...) toque. 


32,27,65,12 


Rcstauraoavanço normal do papel nosalto de 

linhq 


32.27,65,18/24 


Avanço 1,5 ou duplo do papel nosalto de linha. 


32,27,65,8 


Avanço dopapel cm 2/3 no salto de linha, simu- 
lando sobrescrito para anotação de referências, 
notas, potências, etc. 


32,27,65,4 


Avanço do papel em 1/3 no salto de linha, para 
imprimira linha normal abaixodo sobrescrito. 
(Para imprimir subscrito, as duas últimas 
sequências de códigos devem ser usadas na or- 
dem inversa). 
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Especialmente interessante é a simulação do negrito. 

Para tanto necessitamos inicialmente asimulação do BS na 
linha principal. No início da linha seguinte, precisamos da 
sequência: 

27, 75, l, 0, 

que prepara a impressora para a impressão de uma única coluna de 
pontos no modo gráfico. 

A seguir, precisamos da sequencia: 
0, 32, 32 

que provoca o avanço de uma única coluna de pontos sem nada im- 
primir, saltando a seguir dois espaços. Com isso, basta repetir a 



palavra a ser impressa em negrito exatamente abaixo de sua 
ocorrência na linha anterior. 

Para imprimir negrito no início da linha, a sequência: 
0, 32, 32 

deve ser substituída por um caracter nulo, que emite apenas o 
código 0. 

Finalmente, não pode faltar o código 12, que provoca o 
avanço dc página, permitindo assim a paginação da impressão na 
tela, antes da impressão (principalmente sc for usada a simulação 
do BS). 



ib immmmmmtttmmt 

20 '! Redefinidor de caracteres I 

39 't e códigos de iapressão I 

40 I p^ra o rtSXHORD 3.0 t 
50 I da Cibertron ( 

í>0 tmmmimmmmmm 

70 NIDTH4í:KEYl ) CHfií(3lí)+CHfi*[21)+ , riin7 

B"+CHRf[13):KEY2,CHR*U3}+'pokeVCHR*{3 

0|+CHRÍ[J0)H:HR*(30|:KEY3,'e0 , :í:£YV00 

0 , itEY5, , 8008":KEYDfF 

80 Kl=" ":LiN£lNPUT" QUAL CARACTER OU Dó 

DISO? ";LÍ 1 

90 IFLEN[L*)=lTH£NC=ASC(LÍ|ELSEC=VAL(Lt 

) 

100 IFC<32THENC=32 

110 IFC=>2B8ANBC<:=223THENIFASC[KI)=38TH 

ENC=287ELSEC=224 

128 !FC=>255THENC=255 

UB CC=C:U=CHRí(C) 

140 CLSiPRINT- CHR* ' ;L*;SPC( 7) ; "765432 



10";SPE(4);'ASC ";C:BM48BB!+8tCsA=B:F0 

(W=BTDB+7 :6flStíB29f : HEXTR 

158 B=42752'+8tC:A=B:FDRR=BT[IB+7:GuSUB2 

?B:NEÍTR 

16B lFC<=mTHENC=&H9BBF+3t(C-32}ELSEIF 
C=>2BBTHEHC=ftH9D9F+3l (C-224 )ELSEC=*HA4C 
9*(C-M)M 

178 HtfllT'fDK"jCj",')PK)t(K 
I8B PRlNT , POKE';CH;',"iP£Et:(C+l) 
198 PRINT*P0t:E , iC+2i","iPEEi;(C+2í 
200 1FC=>-22839AHDC<^-22778THE«PRINT"P0 
KE " )C+3i ' t * íreEKí C*3) 
210 IFflSC(K*)=iaTHENPfilNT"Ok . Feitas as 
aodificações, registre-as usando <F 
2> a partir da últiaa linha*:PRINI' a 
Iterada. <F1> reinicia o prograia.*;CH 
R*(3B);CHRÍf3B);CHR*(38);:E«0 
220 PRINfCURSOR p/pesquisar INS p 
/■odificarVPRIHT" ESC retorna a 

o HSKHORD" 



238 í(=INt;EY*:IFKÍ="7HEN23B 

248 IFASC(Mj=31THENC=CCH:CLS:GOT018l 

258 !FASCiCÍ}=3BTHENC=CC-l:CLS:SOTQ108 

268 IFASC(Í*!=1BTHÊNC=CC:L£JCATE0,1;6DID 

140 

27B I FASC{ K* ) =27THE«KE¥1 , CHR* ( (r«D8) : KEV 
2,CHf<t|*HDA):i;EY3,CHR$il2):LOAD"MS<tl0R0 
3.0" ,R 

2B0 PfiINTCHRS(30|:GDTO88 

290 «=BI«(PE€K(fl)l 

300 IFLENfAÍ ] <BTHENF0RF*1TQ(8-LEN[ A» ) ) : 

fií='B"*At:NEKIF 

310 FDRF=8T01STEP-i:B*(F)=«IDÍ(A*,F,l): 
IFBt(F]='8"THENBS|F)=" ' 
328 NEXTF 

338 C*=" " :F0RF=BTD1STEP-1 : C*=B* ( F) +C*: H 
EITF 

348 PRINT"P0KE";fl;",4b"; ; IFASC ( K* ) =18TH 

ENPR1NTAÍELSEPR1HTC* 

358 A=A+l:flETURN 



» TOYGAMES INFORMÁTICA H 
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PACOTE GRÁFICO 
PARA PASCAL 

PAULO MARQUES FIGUEIRA 



Apresentemos um pequeno pacote de procedures para o 
TURBO PASCAL com o qual os usuários desta linguagem poderão 
usar certos comandos que só encontramos no Basic do MSX. Sào 
comandos para a produção de sons (Play e Sound) e para recursos 
gráficos (Line, Circle, etc.), que, normalmente, não estão 
disponíveis em linguagens compiladas vindas de sistemas como o 
CP/M. 

O recurso mais usado do Pascal foi o INLINE, que nos 
permite colocar rotinas em linguagem de máquina dentro dos 
procedures e, assim, usar muitas rotinas da própria ROM do MSX. 

É importante ressaltar que os comandos gráficos criados 
utilizam o interpretador Basic da máquina. Logo, o complemento 
dos comandos e a velocidade de processamento é igual à do Basic. 
Cuidado para não cometer erros nos comandos, pois o interpretador 
apresentará a mensagem de erro e o controle do micro passa para o 
Basic. Portanto, sempre salve os programas antes de rodá-los, pela 
opção R do menu principal do Pascal. 

No processo usado é criado uma falsa linha de programa 
Basic e mandamos que o interpretador acumpra. Devido a isto, esta 
falsa linha tem que ficar em uma área da memória acima da ROM, 
que também deverá estar totalmente ativada. Assim, foi definido 
uma variável para o complemento dos comandos, alocada no 
endereço SA00O e uma rotina em linguagem de máquina no 
endereço SC000, que fez a mudança dos slots, ativando as páginas 
da ROM. 



Em outros comandos, como os de mudança de screen, são 
simplesmente chamadas as roúnasdo BIOS. Notequeosprogramas 
compilados cm Pascal Ficam no endereço $100 c, portanto, estão 
com as páginas de ROM desligadas. Mesmo assim, dispomos de 
rotinas, como a do endereço $30, que faz chamadas entre slots. Desta 
forma, o RST $30 foi muito utilizado. 

Na listagem 1 temos as procedures criadas e, nas demais 
listagens, lemos exemplos de uso. Observe que a diretiva de 
compilação (*$!*), que faz a inclusão de fontes no programa, 
incluirá lodos os procedures no seu programa, quer elas sejam 
usadas ou não. Assim, se preferir, grave as procedures no seu disco 
separadamente e só inclua as que for usar no seu programa. 

No caso do comando LINE, a única diferença é que o traço 
que liga as coordenadas dos vértices deve ser o token do sinal de 
menos. Observe os programas exemplos. 

Espero que, com isso, os usuários no MSX possam tirar 
melhor proveito desta linguagem, "envenenando" seus programas 
com os recursos do MSX. 

Até à próxima! 



Paulo Marques Figueira programa em Basic, Cobol, Pascal, 
dBase e Assembly, em micros da linha MSX. É o autor do 
programa Edtronic, comercializado pela Paulisoft, 
Softhouse para a qual desenvolve vários projetos. 



VAR SLOT: STRINGI19] ABSOLOTE SBFFF: 
COMP: STRING[2501 ABSOLOTE S9FFF; 
PROCEDORE SCREHMO; 
BESTO 

INLINE ($F7/800/9«C/$00) í 

END. 

PROCEDORE 9CREEN1 ; 


$E5/$73/$CD/S00/$CO) ; 

END; 

PROCEDORE CIRCLE.- 
BEGIN 

COMP:=COMP4CHR(0) ; 
INLINE ($21/S00/$AO/$DD"/S21/ 
S11/S5B/SCD/5O0/SCOJ; 


BEGIN 

INLINE (ST7/S00/56F/S0O) . 

EHD; 


END; 

PROCEDORE LINE; 


PROCEDORE SCREEN2; 
BEGIN 

INLINE ( $F7/SOO/$72/$00) ; 

END; 


BEGIN 

COMP;^OMP+CHR(0) ; 
INLINE (521/$00/SA0/SDD/$21/ 
$0E/$4B/$CD/$00/$C0) ; 

END; 


PROCEDORE 9CREEK3; 
BEGIN 

INLINE(SF7/$00/$7S/$00) ; 

EHD, 

PROCEDORE PLAY; 


PROCEDORE DRAH: 
BEGIN 

COMP:=COKP+CHR(0); 
INLINE (521/S00/$A0/SDD/S21/ 
56E/S5D/SCD/$00/SC0) ; 

END; 


BEGIN 

COMP*=CCMP+CHR(0) ; 

INLINE (S21/$00/$AO/SDD/S21/ 


PROCEDORE PAINT; 
BEGIN 



OCMP: =CQMP+CHR(0) ; ^ 
INUNE($21/$00/$AO/SDD/$21/ 
$C5/$59/$CD/$00/$C0) ; 

END: 

PROCEDDRE PSET; 
BEGIH 

CCMP : =COMP+CHR ( 0) ; 
INLINE($21/$00/$AO/$DD/$21/ 
$EA/$57/$CD/$00/$C0) ; 

END.* 

PRQCEDURE VDPON; 
BEGIH 

INLINE($F7/SOO/$44/$00) ; 

END; 


PROCEDDRE FILES: 
(*COMP:=' "*.*"' .'FILES: •) 
BEGIN 

COMP:=COMP4CHR(0) : 
INLINE ($21/S00/$A0/$DD/$21/ 
S2F/S6C/SCD/S0O/SCO) : 

END: 

( *INICI0 DO PROGRAMA* ) 
BEGIN 

SLOT : =CHR (SDB) +CHR ($A8) +CHR (SF5) +CHR ($E6) 
+CHR ($F0) 4CHR($D3) +CHR($A8) +CHR($FD) 
+CHR(S21) +CHR(SO0) +CHR($0O)+CHR($CD) 
+CHR ($1C) +CHR (SOO) +CHR (3F1) +CHR (8D3) 
+CHR($AB)+CHR($C9) ; 


PROCEDDRE VDPOFF; 




BEGIN 

INLINE (SF7/$00/S41/$00) ; 

END: 

PROCEDDRE PRINTGRP ; 
BEGIN 

CCMP:=COMP+CHR(0) ; 

INLINE ($21/$00/$AO/$7E/$FE/ 
$00/$CB/$F7 /SOO/S 80/ 
S00/S23/S18/SF5) ; 

END; 

PROCEDURE COLOR (CORI . CORF . CORB : BYTE) ; 
BEGIN 

HEM[$F3E9) :=CORI; 
MEH [ SF3EA] :=CORF; 
MEM[SF3EBt :=CORB; 
INLINE($F7/SOO/$62/$00) ; 

END; 


EXEMPLO 1 
PROGRAMA LINHA: 
VARA: INTEGER; 
B: STRING[3].* 

($1 MSXPACOT.PAGI 
COLOR(15,l,l); 

CCMP:-' '(10. 10) ' +CHR(SF2) + ' (250, 160) . 7,B' ; LINE; 

A:«5; 

REPEAT 

STR (A, B) ( COMP:=' (128,80) . '+B+' . 10' ; CLRCLE; 

A:=A+5; 

DNTILA>60; 

COMP:=' (85,77)' .PSET; 

CCMP : = ' REVISTA CPU' ; PRINTGRP; 

COMP:-' (B6, 77)'. PSET.* 

CCMP :=' REVISTA CPO' ; PRINTGRP: 

CCMP:-' -V15T255L3207CDCD'" ; PLAY; 

READ(A) ; 


PROCEDDRE VPOKE (ENDE: INTEGER; DADO : BYTE) : 
VAR ENDE1 : INTEGER ABSOLOTE $A0OO ; 
DADOl: BYTE ABSOLOTE SB002: 


SCREEN0; 
EMD. 


BEGIN 

ENDE1 : =ENDE; DADOl : =DADO: 
INLINE (S3V502/SBO/52A/SOO/ 

SA0/$F7/$00/S4D/S00) ; 


EXEMPLO 2 
VARA: BYTE; 

(*$I MSXPACOT.PAS *) 


ETJNCTION VPEEK {ENDE: INTEGER) : INTEGER ; 
VAR ENDE1 : INTEGER ABSOLOTE $A000; 

X: BYTE ABSOLOTE SA002; 
BEGIN 

END El :s=ENDE; 

INLINE (S2A/SO0/SA0/ 

SF7/500/S4A/S00/ 

S32/S02/SAO) : 
VPEEK: =X; 

END; 


CCMP:-' "*.*"' ; FILES; 
FOR A: =1 TO 40 DO BEGIN 
WIDTH (A) ; 

GOTOXY(1,1); DELLI NE; 

FORA:=l TO 24 DO BEGIN 

QOTOXY(l.l): INSUNE: 

end'. 


PROCEDDRE SOUND (REGISTRO, DADO: BYTE) ; 
BEGIN 

PORT[160] :=REGISTRO; 
P0RT[161] :=DADO; 

END; 


EXEMPLO 3 

VARW: BYTE; 
I : INTEGER; 
(*$I MSXPACOT.PAS*) 


PROCEDDRE WIDTH (X:BYTE) ; 
BEGIN 

MEM [ 5F3B0) :=X; 

END; 


SCREEN1; 

HRITELN ( 1 ESTOO FA2END0 . . . ESPERE. . . ' ) ; 
FOR I : =2 64 TO 97 6 DO BEGIN 
W:=VPEEK(I); 

VPOKEÍI.WOR (TRDNC(H/2)+TRDNC(W/4))); 


PROCEDDRE CDRSOR (X BYTE) ; 


END; 

COMP:=' "*.*•": FILES; 
READ(W) ; 


BEGIN 

MEMISFCA91 :=X. 

END.* 


SCREENO; 
END. 
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REDATOR ELETROH1CO PARA USX 



O mel Ho r PROCESSADOR DE 

TEXTOS Ja' criado para o MSX ! 
Em CARTUCHO origi na l d. a GRADI 
ENTE por apenas MC z * 18,00 f ! 
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ASPAR 



MASTEm 



o meiKor pacote de «dica o 

de GRÁFICOS COMERCIAI S 6 ESTA 
TISTIC05 disponível ate' então 
para a linha HSX! Monta graf i 
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para aqueles que utilizam o 
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MEBESIS SPECIAL GAJ1E PACK 5 



um pacote especial, reunin- 
do os sensacicmais jogos: 

ríOSM 5NAKE II THE POOEJ OE 
DJHKHE55 e BOABDY O AMES II . 

KlO perca. estes, lançamentos.! 
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OI SA55EMBLÉB .: BECUPEBADOB DE 
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AVARIADOS. ZAPPEP : HABDCOPY 
DE TELAS tSRAEICASj E TC . . . 

Em cartucho por MCE* 38,uo 
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ETIVie! VALE POSTAL O ta CKEQOE. 
NOMINAL a NEMESI S INFORMÁTICA 

CAIXA POSTAL * - 583 CEP SO.OOl 
RIO DE JANEIRO - RJ- 
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THF CCUPHICP SEUSllIIll! 
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ALFABETOS DO GRAPHOS III: 
APLICAÇÕES PRÁTICAS 

GUILHERME A. L.STLLK 



O programa editor gráfico Graphos III, versões 1.1 e 1.2, é um 
dos mais fáceis de se utilizar e um dos mais completos para a linha 
MSX. 

Um dos seus grandes recursos é o de poder editar alfabetos com 
uma simplicidade incrível. Quem tem, sabe. 

A edição de alfabetos permite que o seu uso não se restrinja só 
ao programa fonte (no uso de edição de telas), mas também permite 
sua utilização no BASIC e Assembly Z80 com diversas aplicações, 
por exemplo: redefinição do alfabeto do MSX, impressão, 
utilização em outros programas e mil coisas que sua fértil 
imaginação mandar. 

ORGANIZAÇÃO 

Quando o Graphos III edita alfabetos, ele grava os bytes dos 
caracteres na memória a partir dos endereços 9000H (versão 1 . 1 ) e 
9200H (versão 1 .2). Os bytes são gravados assim: cada 8 bytes um 
caracter, cada byte corresponde a uma linha gráfica deste (são 8 
linhas), que, por sua vez, é formada de 8 bits e cada bit corresponde 
a um ponto que pode estar aceso (1) ou apagado (0). Veja figurai . 
OBS: O sistema hexadecimal é representado por um número 
seguido de H, por exemplo, 9000H. 

Um arquivo de alfabeto tem aproximadamente 200H de 
extensão e pode ser deslocado por um comando BLOAD"xxxx", 
deslocamento. O MSX faz esta operação adicionando ao endereço 
inicial o número após o BLOAD. 
Figura 1 




APLICAÇÕES 
1. Redefinição 

A redefinição do set de caracteres do MSX necessita de uma 
pequena rotina no BASIC, pois a redefinição nâoé feita por BLOAD 
"xxxx", R, como muitos pensam. 

O programa utiliza a SCREEN 1 por ter um padrão de 8x8pontos 
e dá VPOKEs na tabela de caracteres com os bytes do alfabeto. 

Quem tivera versão l.f do Graphos, tem que mudar a linha 150 
de 9200H para 9000H. 
Figura 2 



Como o Basic é muito lento, isso pode ser feito em LM Z80. 0 
programa da figura 2.1 faz isso c, para rodá-lo, dê RUN e carregue 
um alfabeto. Para quem possui o Graphos 1.1, comande POKE 
&hE020,&h90. Aperte ESC para redefinir. 
Figura 2.1 

li BEM REDEFINIDO» L» 1 1.2 
21 REH GUILHERME A.L. DA SILVA 
31 REH PARA «SI 
41 REH 

51 FOR 1=4HEH1 10 «IEB41:«EAD AtiPOKE 
I,VALC(H , rtlliHEIItDEFOSR=H£UllA.«S« 
III 

s« REH 

71 REH DADOS 

HO DATA 21,1C,EI,22,CD,FD,3E,CD,32,CC, 
FD,C>,FE,3A,C0,CD,tF,«,r.D,7B.M,C0,53, 
H,ll 

IH DATA 11,18,11, «1,11,21,11,92, Cl, SC, 
H,16,IF,21,31,EI,7E,CD,A2,íl,21,ia,F«, 
C9,S2,45,44,45,44,4?,4E,49,44,4F,IA,10, 
4F,4I,IA,ID 



0 0 111 

0 10 0 0 
10 10 0 10 

1 0 0 0 0 0 0 
10 10 0 10 
10 0 110 0 
0 1 0 0 0 0 1 



0 0. 

1 0 



1 BIT APAGADO 



1 BYTE 

(8 BITS) 



00111100 



1 BYTE 

(8 BITS) 



U REH REDEFINIDOS 
21 REH 

30 REH PARA A LINHA HSI 
4B REH 

50 REH GUILHERME A.L. DA SILVA 
kl REH GUARARAPES - SP 13/9/6B 
70 REH 

51 111 l,-SCREENr*CHRt{13l 
?0 SCREEN1 

108 PRINT:PRIN7:PRI»T:FORI=1T031:PRIN7C 

HRKlIiCHRMiSrtiliiV^diNEITI 

IH FOR 1=32 TO 255:PRI»T CHRIIIIiiNEIT 

I 

120 DEF FN AH)=ASC[CHR)(I||I0 
13i I=1:F0R J.l 10 255 

140 FOR 1=1 TO 7 

151 VP0LE FNA(I]*I,PEEM»H»211*I*JI8] 

141 NEIT 1:1=1*1 
171 NEIT 1 

101 FOR 1=32 10 255:PRINT CHRI(I) ; :HEiT 



2. Impressão Figura 5 

A impressão de caracteres especiais ou redefinidos só pode ser 
feilano modo gráfico de sua impressora (ver artigo sobre impressão 
em modo gráfico em CPU n° 1). Ouso dele não é muito fácil porque 
a impressora trabalha com os bytes na vertical, devido às agulhas da 
cabeça de impressão e o vídeo do MSX na horizontal. Para corrigir 
isso, uma rotina tem que "tombar" o padrão de bits dos caracteres 
(figuras 3 e 4). 

Na rotina da figura 5 é feito exatamente isso, com o auxílio de 
uma pequena rotina cm linguagem de máquina (figura 6) para 
agilizar o processo. 

Uma T- rotina é utilizada para a impressão, que é composta por 
uma cm Basic (figura 7) e uma outra em Linguagem de Máquina 
(figura 8). 

Figura 3 BYTES NA PRINTER 




AGULHAS DA 
CABEÇA 



128 
64 
32 
16 

8 
4 
2 
1 
0 

Figura 4 Figurão 

BYTES "TOMBADOS" 




o 
o 



NÃO É UTILIZADA 



O 

o 
o 



II INVERSOS DE ALFABETOS 

28 RE» PARA 0 6BAPH0S III V 1.2 

31 «EH 

48 RE» PARA A LINHA NSI 

si seu 

bt RE» GUILHERBE A. L. DA SILVA 
71 RE» 60ARARAPES - 88/IÍ/BB 
81 RE» 

81 DATA 11,F8,?7,11,IB,C5,21,F8,C9,I1,I 
8,1A,17,CB,11,23,11,FA,C1,13,1I,EF,C9 

82 FOR 1=(HC1BI TO »HC8BI*22:READ II : 
POKE I.VAL CIH-Ht) : NEIT 

II CLS 

K RE» - INVERTE 

181 FOR 1=1 TO 2147 STEP 8 

III DEFU5R=!HCB1I 

128 A=0SR(ll 

1JI H=«H»218*l:»t=HEI«IKI:L0CATE 11,11: 

PRIHT'ENDEREÇO FONTE :';HI 

111 POIE lHCI81,VALCM'tRI6HTI(H«,2)l 

151 POIE IHCM2.VAL ClHVL£fTl(»t,2)l 

148 G=lHCBI|tl:6t=HEIl[BI:L0CATE 11,12: 

PRINT-ENDERECO DESTINO: -|6I 

171 POKE IHC187,VAL (■lH I tR16HTI(61,2ll 

108 POIE lHCllB,VALClH-»LEFTIIGt,2l) 

Hl NEIT 

i!l LOCATE «,21:PBINT-PRES5I0NE 00ALOOE 

R TECLA PARA C0NTIN0AR-|:Cl>INPUTt(ll 

1!5 RE» REDEFINE 

211 IEY 1,'SCREE«1 - »CHR((13) 

211 SCREEN 1 

221 ELS:L0CATE1I,I:PRI«T-TESTE':P«INT:P 

RI«T:PRINT:F0R 1=1 TO 31:PRINT CHRIIllj 

CHR![45tVh:V=V«l:NÉITI 

231 FOR 1.32 TO 25S:PRINTCH«II lh:NEITI 

241 DEF FN A(II=ASC(CH«!(I) ]IB 

!S1 I=!:F0R J=l TO 255 

261 FOR 1=1 10 7 

271 VPOIE FNA(I)tI,PEE«(M8«ltIHI8l 
2B8 NEIT I : 1=1*1 
2?B NEIT J 

318 FOR 1=32 TO 255:PRINT CHRI(II;:NEIT 



cm 


11F897 


LD D£,97Fa 


C883 


«608 


LD B,IB 


CWS 


CJ 


posh BC 


CBBi 


21F8C9 


LD HL ,C?FS 


CH9 


um 


LD B,IB 


cm 


IA 


LD A, (DEI 


cm 


17 


RLA 


cm 


CElfa 


RL (HL) 


cm 


23 


INC HL 


cm 


1BFA 


DJNZ CBflC 


CB12 


Cl 


POP BC 


cm 


13 


INC DE 


cm 


1BEF 


DJI4Z C81 5 


cm 


C9 


RET 



CPU 29 



Figura 7 



II REH IMPRESSOR DE 
2» REH ALFABETOS 

38 REH 

41 REH PARA HSI 
SI RE« 

(>■ SEU GUILHERME A.L. 
71 REH GOARARAPES-SP 
81 REH 

91 IF PEEI i iHEBBB ) =1 
SOTO 2S8 

III DATA 3E,B1,32,F8, 
111 DATA ID, Cl, 03,22 
121 DATA li, 3E, 11, 32, 
131 DATA FF, C4, FE, 11 
148 DATA FB,C4,CD,A5, 
158 DATA FF, C4, Cl, CD 
168 DATA CD, D7, BB, 08, 
171 DATA F8, 04,47, 16 
188 DATA 18, FD, 22, SB, 
198 DATA CD, AS, 11, 3E 
211 DATA 3£,18,CD,A5, 
218 DATA A5,B8,E1,86, 



DA SILVA 
19789/88 

THEN RESTORE 518: 

C4,FE,13,C2 
,C8,FE,1B,2B 
FF,C4,C9,3A 
,CA,2>,CB,3A 
11, 3E, 11, 32 
,A8,BB,28,FB 
21, 88, CG, 3A 
,16, 1E, 18, 19 
C1,E5,3E,1B 
,41, CD, A5, BB 
ll,3E,ll,CD 
FF,7E,22,52 



22B DATA Cl, CD, AS, 88, D8, 23, II, FS 

231 DATA 21, BB, CS, C9 

248 FOR l=iHCB88 TO ÍHC06B; READ Vt:POKE 

I ,VAL [ 'iH^Vtl :HEIT:POKE iHEBBB, 1 
251 REH DEFIHE PARAHETROS 
268 POKE ÍHC4FF, 8: 'DESLIGA GRÁFICO 
278 ES=I:'ESC 

2GB DEF0SR=6HCBB8:' DEFINE OSR 
291 PGKE tHFBBB,255:'lNTEfiRGPÇA0 
311 POKE *HF417,1:PADRA0 ADNT 
311 PGKE 4HC4FI,!: 'CARACTERE INPOT 
328 VB=íHC151:P0LE VB,B:'PADRAB 
331 «E«1HCB5C;P0<E VE,B: DE PONTOS 
341 REH PROSRAHA 

351 READ Cl: FOR 1=1 TO LEN (Ct]:AI=HID 
l[CI,I,l)iIF Al= - r THEN PME I«CBB1,27 
:S0TO 418 

361 IF At="«' THEN POKE SHCBB1,19:60T0 
418 

371 IF A$=T THEN LPRINT CNR*I11):GOTO 
511 

3BB IF ALCHRIIl) THEN l=M:H*ASC[HID> 



IC$ , 1 , 1 ) í -64 :POKEtHCHl , H :SOT0 488 

39» PD(E IHCBBl.ASCIAl) 

488 A=USR(BI:í=PEE((tHC4F8|i»2=PEE((lHC 

4FF) 

418 IF INf,EYÍ=CHR*[27] THEN ES=ES+1 
428 IF E5/2<> INKES/2) THEN 511 
438 REH REGISTRADORES 
448 PRINT TAB(18"CAfiACTEfiE.'';CNR«ÍVl;'_ 
H42' ; V 

451 PRINT TAD(1BI;STRINGSÍ21,"- , |:PRINT 
TABUflrGRAFICU"; :1F PEEt((HC4FFX>l T 
HEN PRINT" 0EGLI6AD0...';uSlN6"N';V2:EL 

SE PRINT' LI6AD0 '0SI»G , » , ;»2 

468 II=HEII!PEE[(»HC151))*HEII(PEE>(IHC 
15BI) 

478 PRINI T«BI1I);-JN1C KL MI 

488 Zlt=HEH(PEE«IIHC153l)»HEII(PEE»l4H 
C152)) 

498 PR1HT TAD(IB) ;'INC HL ■ ;Zlt 

5BB NE1T:LPRINT CHH(ií) 

518 DATA-IAGL1» líEORHATICAt ASUIA 

ING0RNATIC5 



Figura 8 



CBII 


3EH 


LD 


A, II 
IC4FB),A 


CB1C 


CA2BC8 


JP I , CB2B 


CB3A 


47 


LD B,A 


CB52 


CDASBB 


CALL BBAS 


CBB2 


32FIC4 


LD 


CB1F 


3AFBC4 


LD A,IC4FI) 


C13B 


1611 


LD D, 88 


C855 


3EB8 


LD A, BB 


CB15 


FE13 


CP 


13 


CB22 


CQA5BB 


CALL 1BA5 


C13D 


ÍEIS 


LD E,BB 


CB5A 


El 


POP HL 


C8B7 


C21DCI 


JP 


NZ.CBBD 


C825 


3EIB 


LD A, 11 


CI3F 


19 


ADD HL, DE 


C85B 


B6B8 


LD B,8B 


C1IA 


C322CB 


JP 


C822 


CB27 


32FFC4 


LD (C4FFI.A 


C84I 


1BFD 


DJHZ CB3F 


CD5D 


7E 


LD A, (HL) 


CBBD 


FE1B 


» 


1B 


CB2A 


C9 


RET 


CI42 


225BCI 


LD IC15BI,HL 


CB5E 


2252C1 


LD (C152I.H 


CBBF 


2116 


JR 


NI,CI17 


CB28 


CDASBB 


CALL HAG 


C845 


E5 


P08H HL 


CB61 


CDASBB 


CALL BBAS 


CB11 


3E11 


LD 


«,81 


CB2E 


2BFB 


JR I.CI2B 


CB46 


3E1B 


LD A,1D 


CB64 


DS 


RET C 


C113 


32FFC4 


L» 


[C4FFI.A 


CB38 


CDB7BB 


CALL B1B7 


C14B 


CDASBB 


CALL B1A5 


C86S 


23 


INC HL 


C816 


C9 


REI 


CB33 


DB 


RET C 


CB4B 


3E4B 


LD A,4B 


C066 


1BF5 


DJNI CB5D 


CB17 


3AFFC4 


LB 


A.1C4FFI 


CB34 


211BCS 


LD HL.C8BB 


C84D 


CDASBB 


CALL B8AS 


CB68 


21B8C8 


LD HL.C8B1 


C81A 


FE11 


tf 


81 


CB37 


3AFBC4 


LD A,(C4FII 


C851 


3EB8 


LD A, BB 


CB6B 


C9 


REI 



2.1 UTILIZAÇÃO 

2.1.1 Rotina I 

Para funcionar, é necessário que se carregue um alfabeto do 
Graphos III. Se sua versão é a 1.1, mude na linha 130 o valor da 
variável H de 9200H para 9000H. Rode o programa. Auto- 
maticamente, este "tombará" os bytes e os deslocará para os 
endereços C800H à DOOOH. Na tela aparecerão os endereços que 
estão sendo lidos e os que estão sendo tombados. Após isso, 
redefinirá os caracteres para testar a operação. Grave com: 
BSAVE"1NVTXT-1.ASM",&HC800,&HDOOO 

2.1.2 Estrutura 



LINHAS 


FUNÇÃO 


10-80 


Linhas REM 


81 


Coloca a rotina Assembly na memória 


90 


CLS 


100 


Loop principal 


110-120 


Chama assembly 


130 


Define o endereço da labela de bytes do alfabeto 


140-150 


Indicam à L.M. onde encontrar os bytes do alfabeto 


160 


Define o endereço onde os bytes "tombados" serão 




colocados 


170-180 


Indicam à L.M. onde colocar os bytes 


190 


Fecha o loop 



191 Espera uma tecla 

195 Redefine 

210 SCREEN1 

220-230 Imprime set de caracteres MSX 

250-290 Loop de redefinição 

300 Imprime parcialmente o novo set 

2.1 3 Variáveis 

H Início do alfabeto fonte 

G Representação hexadecimal de H 

GS Representação hexadecimal de G 

FN a(x) Endereço do caracter na tabela dc padrões da VRAM 

Carregue os dados invertidos na memória com 
BLOAD"fNVTXT-l.asm". Digite o programa impressor e rode. 
Enquanto estiver imprimindo, aperte ESC e verá, num passe dc 
mágica, os misteriosos conteúdos dos registradores do Z80, HL 
(endereço dos bytes) e A (código ASCII do caracter), além de saber 
se o modo gráfico está ligado ou não. 

Na linha 510 existe um comando DATA para colocar men- 
sagens. 

Existem 3 caracteres de controle. São eles: 

- Caracter * (asterisco) - liga o modo gráfico 

- Caracter + (sinal mais) - desliga o modo gráfico 

- Caracter % (porcentagem) - dá um line feed na impressora 



Nas linhas 320 e 330 é definido o comprimento do caracter 
(pontos na horizontal), valores de 1 a 8. 
Para interromper, aperte: 

CONTROL + SHIFT + LGRA + RGRA. 
Evite o CONTROL + STOP. 



2.2.2 Estrutura 




LINHAS 


FUNÇÃO 


10-80 




Linhas REM 


90 




Verifica se precisa colocar na memória a rotina 






em L.M. 


10-240 




Rotina em L.M. 


250-330 




Inicializa 


350-370 




Lê mensagem e define caracteres dc controle 


380 




Converte caracteres gráficos e indica a L.M. 


390 




Indica "a L.M. caracter comum 


400 




Chama L.M, c le registradores do Z80 


410-420 




Espera ESC 


440-490 




Mostra conteúdo dos registradores Z80 


500 




Fim 


510 




DATA da mensagem 


2. .3 Variáveis 




CS 


String da mensagem 


AS 


String d 


a letra a imprimir 


V 


Código ASCII do caracter 


V" 


Indicador do modo gráfico 


ES 


Indicador da tecla ESC 


ZS 


HL anles da impressão 


ZlS 


HL depois da impressão 



3,2 Como utilizar 

A conversão do GRA/P-X-P é feita do seguinte modo: 
- pressione 1 carregue um arquivo .MVF; 

" carregue um alfabeto. ALF com deslocamento 1; 
grave um arquivo com extensão .MVF com parâ- 
metro 1; 

dê o nome do arquivo acima gravado - agora sem 
extensão. 



3. CONVERSOR 

O programa tem como objetivo converter alfabetos do Graphos 
(abreviatura Gra.) para o Print-X-Press (abreviatura P-X-P), que 
é uma Page Maker, ou vice-versa. As vantagens são claras: o 
Graphos tem um editor potente, fácil e com uma gama de 28 
alfabetos disponíveis no mercado; o P-X-P tem um editor super 
potente (tem recursos de animação por "filmation", imprime os 
caracteres em um quadriculado na impressora com os bytes cm 
hexadecimal, decimal e binário; fazendo, também, caracteres colo- 
ridos), mas não é de fácil utilização, além de ter um compilador que 
é uma "mão na roda". 

Então, esse conversor é útil para os felizardos que possuem os 
dois programas. 



Opção 1 
Opção 2 
Opção 3 



- pressione 4 



Do P-X-P/GRA é a seguinte: 

- pressione 2 carregue um arquivo.MVF e com deslocamento 2 

- pressione 3 grave um arquivo .ALF com parâmetro 2 

Obs: MVF é extensão do P-X-P; ALF é extensão do Graphos. 



3.1 Funcionamento 

Permite ler um alfabeto do P-X-P, com aextensão 
.MVF (P-X-P) 

Lê arquivos com deslocamento 1 (P-X-P/GRA) e 
2 (GRA/P-X-P) 

Grava com parâmetros 1 (GRA/P-X-P) e 
2 (P-X- P)/GRA). 
Opção 4 Cria partícula .DAT, usado só para GRA/P-X-P. 

Opção 5 Mostra tabela de parâmetros 

Opção 6 Files 
Opção 7 Fim do programa 



Obs: Quando se quer utilizar o conversor do GRA para o P-X-P, 
deve-se adotar 1 como deslocamento e parâmetro e, quando se quer 
o contrário, adota-se 2. 



3-3 Estrutura 




LINHAS 


FUNÇÃO 


10-19 


Linhas REM 




Inicializa variáveis 


30-100 






Seleciona escolha 


130 


Volta ao menu 






150 


Opção 1 


154 


Recolhe dados 




Lê arquivo .MVF (P-X-P) 


1SR 1QO 


Retoma 


20o" 




210-230 


Recolhe dados 


240 


Lê arquivo DS com o deslocamento D%(DE%) 


245-299 


Retoma 


250 


Opção 3 


252-258 


Recolhe dados 


260 


Grava arquivo G$ iniciando em El% (P%) e 




finalizando EF%(P%) 


270-299 


Retoma 


300 


Opção 4 


310-320 


Recolhe dados 


330-345 


Grava arquivo .DAT 


346-349 


Retorna 


350 


Opção 5 


352-358 


Imprime tabela 


398-399 


Retoma 


400 


Opção 6 


410-430 


Dirctório 


500-550 


Rotina de tratamento de erros 



3.4 Variáveis 




ES0 


Matriz dos parâmetros 


EI%() 


Matriz do endereço inicial 


EF%() 


Matriz do endereço final 


D%0 


Matriz do deslocamento 


P% 


Parâmetro escolhido 


DE% 


Deslocamento escolhido 


ss 


Escolha 


PXS 


Nome do arquivo na opção 1 


DS 


Nome do arquivo na opção 2 


GS 


Nome do arquivo na opção 3 


PTS 


Nome do arquivo na opção 4 



10 (EH 

11 iek amam 

12 IEK DE «.FB8ETOS 

13 REM 

14 IEK Pfllfl HSX 1.1 

15 IEK 

li IEK GUILHERME 11. L. SILVA 

17 IEK 02-09-88 

18 IEK GUflRRRRPES 
1? IEK 

20 «E!fOFF:CLEflR 20O.SH92O0:0H ERROR 60T 
0 500 

21 DATB D0fC.9200.DfflO.MfF.3EfC.C104 

22 FOR 11=1 TO 4: IEB0 EI(IZ>:HEXT 

23 FOR IZ=IT02: EIZ(IZÍ=VAL("JH"+ES(IZ) 
) : EfZIIZ)-VAL("Mr*EI(IZ»2)):0Z(IZ)=U 
flLCÍH"*ES(IZ»4l):HEXT 

30 CLS:P1IKT TA!(5):"I TIAHSfOIKAOOI OE 
ALFABETOS r 

40 LOCBTE 15.3:PRIKT"KENU M 

só locbte ie.<>>niNT-tn lei p-x-p- 

60 LDCflTE 10.8:PIINT"[2T LEI ALFABETO" 
70 LOCA TE 10.10:PII«T-[3] GRAVAR BLfflBE 
TO- 
SO LOCBTE 10.I2:PI1HT"E4] CIIBI PBIT1CU 
LA" 

90 LOCBTE 10.I4:PRINT"[5] TABELA" 
95 LOCATE 10.16:PIINT'[4] FILES" 
94 LKATE I0.18:PIIHT"[7] BASIC" 
100 LOCBTE 15.21 :PIINT"0PCA0: " : :SS=1HP 
UTKll 

110 If 5KT 01 Sl)"7" THEN 100 

120 OH VAL(SI) G0SU1 150.200.250.300.35 

0.400.140 

130 GOTO 30 

140 CLS:IETOH:EHD 

150 CL5:PIIKTSPC(14) : "OPCA0 1 : " :PRI*T :P 
IIHT SPC(4)fLEI AROUIVO PI1HT-X-PIESS" 
152 LOCATE 11 .9:PRIKT"KOKE DO ARSUIUO: 
":LOCAT£ 11.10:1KPUT PXI 
154 LOCATE 4.13:PII«T"C0L00UE O DISCO K 



O ORiVE A":AS=INPUTI(1) 
154 BLOBD PXI 

158 LOCATE 18.21 :PRINf OIÍ ,, :At=tNFUrS( 1 ) 

199 IETUIK 

200 CLS:PRINT SPC(14):"0PCA0 2"iPR[KT:P 
RIHT SPC(4):"LEI AROUIVO COK DESLOCBKEK 
TO" 

210 LOCATE 9.4:PIIHT"II0KE DO AIOUIVO: " 
: LOCATE 9,7:IHPUT DI 
220 LOCATE 9,11 :PR[KT"DESLOCBKEKTO (1-2 
>":LOCATE 9,12:lKPUT DEZllf DEI O 1 BK 
D DEZ O 2 THEN 220 

230 LOCBTE 4,14:PRINT"C0L00UE O DISCO K 

O DRIVE B":BI=INPUTS(1I 

240 ILOAO DI.DZ(OEZ) 

245 LOCATE 18.21 iPRINT "0I":BS=IHPUTI(1 

I 

249 RETURH 

250 CLS:PRINT SPC(15):"0PCAO 3: ":PIINT 
:PR INT SPC(I1):"6RAVHR AROUIVO" 

252 LOCATE 11 .4:PR1HT"N0KE DO AIOUIVO: 
"1L0CATE 11.7HHPUT CS 
254 LOCATE 11 .11 :PIIKT"PAIAHETIOS (1-2) 
: "ILOCBTE i 1 . 12: IHPUT PZilf PZil 01 PZ 
12 THEH 254 

258 LOCATE 2.15:PI[HT"C0L0O0E O DISCO D 

ESTIMO HO DIIOE A":BI=IHPUTI(1 1 

240 BSAVE GI.EIZIPZ).EfZ(PZ) 

270 LOCBTE 18.21 :PIHT"0K":A!=IHPUT!(1 1 

2M IETUIK 

300 CLSiPIlHT SPC(15):"0PCA0 4:":PIIHT: 

PIIHT SPC(9):"GRAVA1 PARTÍCULA .DAT" 

310 LOCATE ll.B:PRIHT"HOKE DO AROUIVO: 

"iLOCBTE 11.9:IHPUT PH 

320 LOCBTE 4.14:PRINT"C0L00UE O DISCO H 

O DIIOE 8":AI=IHP0TI(1) 

330 OPEH PT!*".DTA" FOR OUTPUT AS «1 

340 PIIHT ll.PTif.HOF" 

345 CLOSE «1 

344 LOCATE 18.21 :P1IHT"0K":8I=IHPUTI(1 1 
349 RETURH 



350 COLOR 3:CLS:PRIHT SPC(I5):"OPCAO 5: 
"IPIIHTIPIIHT SPC(9):"TBBELB OE PBRBHET 
ROS" 

352 LOCATE 0.5:PIINT STRIHBS(39."-"|:L0 
CATE 0.4IPRIHT SPC(41 - PBIBKETI0 1 "jSPCt 
?h"PARBHETRO 2":L0CBTE 0.7:PRIHT STRIN 
BK».-- - ) 

354 fOR 1Z=0 TO 10:L0CBTE 18,8tlZ:PRINT 
■ ":NEXT:L0C8TE 0.18:PRIHT STRINGK39," 
-"IsLOCBTE Õ.201PRIHT STI1HGS [».---) 
354 LOCATE 3,9:PRIHT"IKICI0: DOFC":LOCA 
TE 3,12:PRIHT"FINflL: DB10":L0CBTE 3,15: 
PRIHT-DESLOC: 3EFC" 

358 LOCBTE 23.9:PRIHT"INICI0: 9200": LO 
CATE 23,12:PRIHT"flHBL: 99fF":L0CBTE 23 
.15:PRIHT-0ESLOC: C104" 
340 LOCBTE 17,1?:PRINT"0K":AI=IHPUTI(1 > 

398 COLOR 15,1,1 

399 IETUIK 

400 CLS:PRIHTSPC(15I;"0PCA0 4: "SPRINT; 
P1IHTSPC(10>"AI1UIVOS 00 DISCO" 

410 PRIHT:FILES 

420 PRIHT:PRIHT:PIIHTSPC(17)"0K":A!=IHP 

UTI(l) 

430 RETURH 

500 If EII=53 THEN LOCATE I0.19:PI1HT"A 
IOOIVO IHEXISTENTE ,, :PLBrV1507C4":|ESUH 
E NEXT 

510 If EIR=54 THEH LOCBTE 13.19:PRINT"H 
ONE ILEGAL" :PLAV "01507C4":RESUKE NEXT 
520 If ERR=49 THEN LOCATE 13,19:PIlNT"e 
rro de e/s":PLHY"vl507c4 ,, :IESUHE NEXT 
530 If ERR=48 THEN LOCBTE 11 ,19:PIINT"0 
ISCO PROTEGIDO":PLflrvi507C4":RESUHE NE 
XT 

540 If ERR=66 THEH LOCATE 13.19:PRIHT"D 
ISCO CHEI0 ,, :PLArV1507C4":RESUHE HEXT 

550 LOCATE 15.19:PRINT"ERR0 ":ERI:PLAÍ" 
V1507C4":RESUHE:KEXT 




* DRIVE 5. 1 1A SUN COMPLETO # EXPANSOR Dí SLOT (C/4 SLOTS) 
• PLACA 80 COLUNAS * GABINETE P/DRfVE COM FONTE H 

«MOOEN DE COMUNICAÇÃO «INTERFACE DUPLA P/DRfVE 



7 m*s - 6O.00 



-y i L i( ;tf ní >ss-: ) CatálOGG -Ji PROG/íama;, i-ara ia." :■■ A ia r ■,: . uma .vir,;;.! M( >•■ ■< /.a >-. '/■. IMA!» IM ;.: via S! i 
PARA FAZEI? SEU PEDIDO f NVIE CHEQUE NOMINAL COM CAUTA Dí TALHADA RA D* A. NASSEB 
BIO DEJAHIIOO: RUA GONZAGA BASTOS 411(203 — VILA ISABFI - Í)J CEP 20M1 - TEL [021] 231 07 75 
«■UM euBIT.ÉA ■ ■ ■ ■ ■ . ■ 



32 CPU 



fABÃSTECA (A 

SEUMSX 
NA ECTRON. 



EQUIPAMENTOS PARA MSX 

Driver MSX 5 1/4 
Driver MSX 3 1/2 
Video Stalion 
Interface p/ Drlve 
Cartão 80 Colunas 
Modem 

Monitores de Video 

Gabinete e Fonte p/ Driver 

Ponta Discos "Acrílico" 100 Discos 

Mesa para Computador 

Mesa para Impressora 



SUPRIMENTOS 

Disquetes 

Fitas p/ Impressora 

Formulários Contínuos 

Capas Protetoras p/ Equipamento; 



LITERATURAS 

Livros 100 Dicas 

Uvros 50 Dicas (EM LANÇAMENTO) 
Livros Programação Avançada 
Livros Astrologia 
Livros Curso de Música 
Livros Curso de Basic 



— Fitas de Vídeo 

• Na Ecatron você encontra o último 
lançamento "MPO" em videocassete 
"Curso de Basic MSX" acompanha livro. 

• "Dominando e MSX" 



SOFTWARE 

• D. Base Ferramenta Profissional p 
manipulação de banco de dados. 

• Super Cale: A mais famosa Planilha de 
cálculos. 

(Ambos com suporte técnico e reposição de 
versão) 



APLICATIVOS 

Os mais potentes do mercado 



Temos a coleção completa inclusive os 
últimos lançamentos. 

Solicite nosso catálogo inteiramente 
GRÁTIS. 



• Nossa caixa PosBI 120115 - Cap. 02098/ SSo Paulo/ 

ECTRON ELETR0NICA LTDA. 

Rua Dr. Cesar, 131 -Metrô Santana -S.Paulo/SP 

TIL: (011) 290-7266 





BUTTY SPRITE 



ALEXANDRE C. DULLWS 



O programa que apresento é um editor de sprites com vários comandos que irão auxiliá-lo na confecção de sprites de 16x16. 
Este programa chama-se Butty Sprite e a sua versão é a 1.0. Sua operação é simples e a sua digitação um pouco cansativa. 
Depois de digitado e gravado em disquete ou fita cassete, rode o programa com o comando RUN. 

Para mover o sprite dentro do quadro de desenho, use as setas que movimentam o cursor e, para marcar ou apagar um ponto do sprite, 
use a barra de espaços. 

Para ter acesso aos comandos, deve-se teclar, primeiramente, a tecla Fl . 
Os comandos disponíveis no Butty Sprite são os seguintes: 



HOME/CLS - Limpa o sprite, apagando-o da memória e da 
tela. 

INSERT - Pinta toda uma linha. 

DFXETE - Apaga toda uma linha. 

ESC - Sai do programa. Nesta opção, o programa irá 

solicitar confirmação e, em caso'positivo , o 

programa acessa o Basic. 
CONTROL + A - Inverte todo o sprite. 

CONTROL + B - Faz com que todo o sprite seja deslocado uma 
linha para cima. 

CONTROL + C - Faz com que todoo spriteseja deslocado uma 

linha para baixo. 
CONTROL + D - Faz com que lodo o sprite seja deslocado uma 

coluna para a direita. 
CONTROL + E - Faz com que iodo o sprite seja deslocado uma 

coluna para a esquerda. 
CONTROL + F - Faz uma cópia do bloco 1 sobre os blocos 2, 3 

e 4, 0 conteúdo dos blocos 2, 3 e 4 é perdido. 
CONTROL + G - Faz uma cópia do bloco 1 sobreo3edobloco 

2 sobre o 4 . 0 conteúdo dos blocos 3 e 4 é 

perdido. 



CONTROL + H - 
CONTROL + 1 - 
CONTROL + J - 



Lista estes comandos no vídeo. 
Lista estes comandos na impressora. 
Lista os dados do sprite cm hexadecimal r 
tela. 

CONTROL + M - Lislaos dados do sprite cm hexadecimal r 

impressora. 
CONTROL + N - Inverte coluna. 
CONTROL + O - Inverte Unha. 



Para ler o sprite, digite este pequeno programa: 

10 SCREEN 2,2 : FOR A=l TO 16 : READ A$,B$20 
C$=C$+CHR$ {VAL{"SH"+AS) ) 
30D$=D$+CHR$ (VAL ("SH"+B$) ) 40 NEXT A : 
SPRITES {1)=C$+D$50 PUTSPRITEO, (127, 97), 15, 1 
: GOTO 50 

60DATAFF, FF, 8 0,1, 80, 1,80, 1,80,1, 80, 1,80, 1,80, 
1, 80, 1, 80, 1, 80,1, 80, 1, 80, 1,80,1, 80,1, FF, FF 



1 " ******************************** 

2 " * EUTTY-SPRITE' s 16x16 * 

3 ' * By:Alexandre Cardoso Dullius * 

4 ' * Rua Lirxiolfo Collor 111 * 

5 ' * Sapiranga RS CEP:93800 * 

6 ' * Revista CPU "guia Inf . LTDA * 

7 ' ******************************** 

8 FDF¥^1TD10:KEYA,'' M :NEXTA:GOTD65 

9 ' CTRL+A 

10 GOSUETO:A^ M CTRL+A M :G0EUB62:GC6UB122 
: L=fl : FUFC=4iTD162STEP8 : K=0 : L=L+1 : FORD=i 
6TD139STEF8 : K=K+1 

11 IFPOINT(D+5,C+5)=147>&4,IhC(D+l,C+l) 
- ( D+8 , C+B > , 1 , BF rPRESET ( K+17 , L+17 ) , 1 :P ( K 
,L)=0:GOTO13 

12 LIf^(D+l,C+l)-(D+8,C+a),14,BF:PFESET 
<K+17,L+17),15:P(K,L)=1 

13 NEXTD, C 

14 GOTDBB 

15 ' ESC 

16 GOSUB?5:A*= ,, E5C ,, :GOSUB62:E=155:F=106 
:G=15:A*="CQrFIRMfl(S/N) " :GOSUE62 

17 BÍ=INFUTÍ(1) : IFB*="S M TI-ENEND 

18 IFBt= M N ,, "n-ENBB 

19 BDT017 

20 ' DELOE 

21 GOSUB95:A^'TB-E^ ,, :GOSLB62:FCRD=16T 



01 38STEP8 : L 1 1* ( D+l , Y+l) - { D+B , Y+8 ) , 1 , BF : 

NEXTD 

22 C=INT((Y-^)/B)+l:F0RZ=lT016:P<Z,C)= 
0:FflESCT(Z+17,C+17),l:NEXTZ 

23 GOTDBB 

24 ' INSERT 

25 G0SUB95:A^"ir&Rr M :B0SUB62:FCFtD=16T 
Ol 3BSTEP8 : L I NE ( D+l , Y+l ) - ( D+8 , Y+B ) , 14 , EF 
: NEXTD 

26 C=INT((Y-40)/8)+l:rTJRZ=lTD16:P(Z J C)= 
1:PRESET(Z+17,C+17) ,15:NEXTZ 

27 GOTDBB 

28 ' HOME OU CLS 

29 GO3UB95:A^"HDr^ajS M :Q0ElJB62:GaSUBl 

22 

30 LiNE(14,Í4)-(40,3B) ,1,EF:LINE(14,14) 
-(40,38) ,2,B:LINE(15,40)-< 145, 170), 1,BF 
:LINE(15,40)-(145,170),4,B:FORD=1TO16:F 
0RD=lTO16 : P ( D , C )=«: NEXTD , D : GOTDBB 

31 ' Fl 

32 SQt tAXi , 8 : FIT<A==255T01STEP-1 5 : SOUND0 , A 
:NEXTA:SOUND0,0:LINE(90,180)-(150,190) , 
l,BF:LIhE(152,100)-(240,18B),l,EF:LINE( 
152,100)-(240,1BB),6,B 

33 A^INHJT*(1):IFASC(A*)=32T>EN33 

34 IFASC(At)=llCFSASC(A*)=127FEN29 

35 IFASC(A*)=1BTVEN25 



34 CPU 



36 IFASC(A*)=127TTtKZl 

37 IFftSC(A*)=27TFEN16 

39 D-ASC<A*):CM]GOTTJ10,97, 90,111,107, 11 
4, 118, 124, 147 , 151 ,,, 161 , 166, 171 

39 G0TO33 

40 ACENDE GU APAGA 

41 IFSTTÍIG(0)<>0í*I]POINr<X+5,Y+5)=14TVE 
N_INE<X+l,Y+l)-<X-ie,Yfe) ,1,BF:D=INT< <X- 
15)/B)+l:C=INT((Y--40)/B)+lsP<D,C)=0!PRE 
SET ( D+17 , C+17 ) , 1 : G0TD43 

42 IFSTRIG<0K>0TVEM-II^(X+l,Y+l)-<X4e, 
Y-H3) , 14,BF:D=INT( (X— 15)/8)+l:C=INT( (Y— 4 
0)/8>+l:P(D,C)=l:PRESET(D+17,C+17>,15 

43 RETLFN 

44 PUTSrRITE0,<X,Y>,15,l:GO5UB41 

45 G0TO65 

46 ' MOVIMENTO 

47 K=STICK(0)«TICK(l)->STiaí(2) 

48 IFK=lT>ENY=Y-e 

49 IFK=2TFENX«*tB:Y=Y-e 

50 IFK=3TFENX-X-te 

51 IFK=4THENX=X-te:Y=Y« 

52 IFK=5TFENY=Y+6 

53 IFK=6TVENX=X-B:Y=Y-te 

54 IFK=7TFENX=X-B 

55 IFK=8TVENX=X-e!Y=Y-8 

56 IFX<16THENX=16 

57 IFX5136TVENX-136 
59 IFY<41THENY=41 

59 IFY>161TFENY=161 

60 RETURN 

61 ' IMPRESSÃO 

62 FII^lTnLEN(ftt)-.SOljrCO,E:I]RBW"BM ,, -tST 
R»(E)+","-tSIRt(F):Ca_ORG:PRINr#l,MID»(A 
*,D,i) 

63 E^fFhNEXTD:SOLN>0,0:RETURN 

64 ' Rotina Def aut 

65 COLmi5,l,l:CLEAR!DEFINTA-Z:MAXFILES 
«SiOF^-GRPi-HMIJIPUTflBItlsBCREB^^.Oi 
DEEP 

66 ' Limpa matriz, define variareis 

67 DIW<16,16),J(16,16):FORC=lTO16:FDRD 
=1TO16:P(C,D)=0:NEXTD,C:X=16:Y»41:S=1:B 
EEP 

68 ' Define Sprite 

69 FORD=lTOB:REBDAt:B»=««>Fit(WL("SH" 
-tA*)):r«TO:BEEP:SPRITE*(l>-B*:DATA31,6 
6,66,0,0,66,66,81 

70 POKESH=CAB,l 

71 ■ DESENHA TELA 

72 LINE(14,14)-(40,38),2,B 

73 LINE(15,40)-<145,170),4,B 

74 E=70:F=3:G=10:H=7:ft*="BlJrrY-8FRITE": 
SOLM»,8 

75 QDSUe62:E=71:e0SUB62:E=44:F=13:G=3:H 
=7:A*="By->Alexandre Cardoso Dullius":G 
0SUB62 

76 E=43:G0GUB62:E=55:F=23:G«7:H=16:AS=" 
REVISTA CPU" :GOSLB62:E=56:GOSUB62 

77 E=63:F=<32:G=10:H=7:A*="Aguia Informa 
tica LTDA ,, :GD8UB62:E==62:GaGUB62 

78 E=152:F=50:S=15:FW.!A»= ,, PA«ft DIGITAR 



UM":G0SUB62:E=152:F=5B:A*="COMAM]a , T 

ECLE":G0SUB62 

79 E=152:F=66: A«=" Fl ANTES ! ! ! " :GC6UB 

62 

80 E=2a:F=181:G=ll:H=7:A«="C0m«}=;":G 
OSUB62 

81 LINE<152,100)-(240,18B),6,B:EEEP 

82 ' LOOP PRINCIPAL 

83 FUTSPRITE0,(X,Y),15,1:GOSUB47 

84 PUTSPRITE0, (X,Y) ,15,1:G0SUB41 

85 kEY(l)DN:Q>«EYGDajB32 

86 G0TD83 

87 ' LIMPA CUADRO 

88 LI>E(152,100>-<240,1BB),1,BF:LINE(15 
2,100)-(240,1BB) ,6,B:GOTDB3 

89 ' CTRLfC 

90 GOSUB95:AS^ M CTT^4C M :GC€UB62:GOSUB122 

91 FTJRB=1T016:J(B,1)=P(B,16):NEXTB 

92 FORA=lTQ15:FORB=lTD16:J(B,A+l)==p(B,A 
)=NEXTB,A 

93 GOTD102 

94 • DDD 

95 E=90:F=181:G=10:H=6:RETURN 

96 ' CTRL-*© 

97 GC&JB95:AÍ= M CTRLfB M :GC6lB62:GCeUBlZ2 

98 FGRB=1T016:J(B,16)=P(B,1):NEXTB 

99 FDRA=16TD2STEP-1:FDRB»=1T016:J(B,A-1> 
=P(B,A):NEXTB,A 

100 GOTTJ102 

101 ' AJUDA 

102 FTJRA«lTm6:F0RB=lTG16:P(B,A)^J(B,A) 
:l«XTB,A:K^:PORB=41TD163STEPB:K=K+l:L» 
0 

103 F0RA=16TD1375TEPB:L==L-t-l: IFP(L, K)=1T 
HEM_INE(A*-l,B+l)-(PHG,B*e),14,BF:PRESET 
(L+17.K+17) ,15:GOTD105 

104 LINE(A+l,B+l)-(«<B,B*e),l,BF:PRE5ET 
(L+17,K+17),1 

105 NEXTA,B:GOTUB3 

106 ' CTRL+E 

107 GOSUB95:A»="CTRLfE":GOSUB62:G0SUB12 

2 

108 FDRB=1TD16!J(16,B)=P(1,B) :f*EXTB 

109 FTJRA=16TU2STEF^1:FDRB=1TD16:J(A-1,B 
)=P(A,B):NEXTB,A:BDTD102 

110 ' CTRL+O 

111 G0SUB95:AÍ="CTRL+O M :GCELB62:Grj5UB12 

2 

112 FDRB=lT016:J(l,B)«P(16,B):tO(TB:FaR 
A=lTDlS:FQRB=lT016:J(Afl,B)=P(A,B) :t>EXT 
B,A:GOTO102 

113 ' CTRLfF 

114 BOSLe?5:A*«"CTTifF":GOSUB62:GOSiJB12 

2 

115 F0RA=1TD16:FDRB=1TD16;J(B,A)=P(B,A) 
:NEXTB,A 

116 FDRA=2TW:FTJRB=1TD16:J(A,B)=P(1,B): 
I^EXTB,A:GOTO102 

117 ' CTRLM3 

118 GDajfif95:A^ M CTRL-H3":GOSUB62:GOSUB12 

2 

119 FDRA=1TD16:F0RB=1TD16:J(B,A)=P(B,A) 
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:NEXTB,A 

120 F0RB=1TD16:J<3,B)=P(1,B):J(4,B>=P(2 
,B) :NEXTB:GOTO102 

121 ' PROCESSANDO 

122 E=155:F=123:B=15:l**:í»="flQJff<DE!": 
GDSUB62:E=160:F=14B:G=14:H^:AÍ="PROCES 
SANDO. . . " :G0SUB62:RETURN 

123 ■ CTRL-rtH 

124 Rr^0fiE126:SCREEN2=G=ll=F=5:l*=6:F0R 
EKlT017:E^:READAt:G0SUB62:LINE<6,F-2)- 
((Lr:N(AÍ)«6)+13,F-te),13,B:F=F+ll:NEXTB 

125 M=Ihf=UTÍ(l):Q_3:K=a:FCFB=41TOldi2Sr 
EPB:K=K+l:L=O:FCRft=lí>T0137STEFa:L=í.-H:G 
OT0143 

126 DATA HDME/CLS - LIM=A A SPRITE 

127 DATA INBERT - PINTA TODA LINHA 
12B DATA DELETE - APAGA TODA LINHA 

129 DATA ESC — SAI DO PROGRAMA 

130 DATA CTRL-W - INVERTE OS QUADROS 

131 DATA CTRL+B - SCROLL P/ CIMA 

132 DATA CTRL-iC - SCROLL p/ BAIXO 

133 DATA CTRL-tO - SCROLL PI DIREITA 

134 DATA CTRL+E - SCROLL P/ ESQUERDA 

135 DATA CTRL-tF - ESPEU-D 1/4 

136 DATA CTRL*G - ESPELHO 1/2 

137 DATA CTRL+Ff - LISTA COMANDOS VÍDEO 
139 DATA CTRL+I - LISTA C0MAMJO5 IM=RES 
SORA 

139 DATA CTRL+J - LISTA DADOS HEX. VIDE 
O 

140 DATA CTRL+M - LISTA DADOS HEX. IrtrR 
ESSORA 

141 DATA CTRL+N - INVERTE SO COLUNA 

142 DATA CTRL-HD - INVERTE SO LINHA 

143 IFP(L,K)=lTHENLINE(A+l,BH)-(A»e,B+ 
S) ,14,EF:PRE9ET<L+17,K+17) ,15:GOT0145 

144 LINE(A+l,B+l)-(A+B,B«e),l,BF:PRE5ET 
(L+17,K+17),1 

145 NEXTA,B:RETURN72 

146 ' CTRL+I 

147 G03UB95:A*="CTTi+I":G0SUB62:E=153:F 
=105:G=15:H=6:At="TEDLE ALGO" :GOSLB62:E 
=15B:F=113:A*="PARA IMPRIMIR" :GOSUB62 
14B A*=IW=UT*(1):E=160:F=132:G=14:AÍ="I 
MFRIMIM»..."=G0SUB62:LPRINT" COMAM» 
S DO BUTTY SPRITE 1.0" 

149 RESTORE126:BEEP:F0RB=lTO17:READAt:L 
PRINTA* : LPRINT :NEXTB :OOTOBB 

150 ' CTRL+J 

151 BaSLB95:A*="CTT^+J":93SLB62:GOSUB12 
2:SQtr^:COLCR15:DRAW"EM9,5":FORO=lT01 



6:F0RB=lTO16 

152 P*^+RIGHT*(STRÍ(P(B,A)),1>:NEXTB 

153 T*=LEFT*(F-I.,B):KÍ=RIGHTÍ<P*,B) 

154 Ut=HEXt(VAL("*B"1-TI)):LÍ=tCXi(VAL<" 
&B"+K*)) 

155 PRINTtll ,UÍ ; " , " ;Lt; " , " ; :P*="" :T«=P*: 
Kt=T*:Lt»KÍ 

156 IFA=5THENDRAW"BM9,15" 

157 IFA=10THENDRAW"BM9,25" 
156 IFA=15THENDRAW"BM9,35" 

159 NEXTA:G0TO125 

160 ' CTRL+M 

161 G0SUB95:A»="CTRL-m":GO3UB62:E=155:F 
=1Z3sG=14:H=6:A*="TEDLE ALGO":GOSUB62:E 
-160:F=133:6=15:At="PARA IfFRIMIR" :GOSU 
B62 

162 At=IM=UTt<l):E=155:F=145:A»-"IM=RIM 
IND0...":GOSUB62:LPRINT" DADOS DD SPRI 
TE... CRIADO ND BUTTY" 

163 FrjRA=lT016:FTJRB=lT016:PÍM=*+RIGHTi< 
STRt(P(B,A) ) ,1 ) :NEXTB:Tt=LEFT»(Pt,B) :KÍ 
=*IGHT*<P*,B) sUÍ=HEX*<VAL( "Sfi"+T*) ) 

164 L*=TEXÍ(VAL("»B"+Kt)):LPRINTUt;","; 
Pt ; " , " ; :P»=" " :Tt=pt: Kt=T*:Lt=Kt:NEXTA:C 
LS:GOT0125 

165 • CTRL+N 

166 GOSLB?5:A!l»"CTRL+N":GOSLB62:ODBUB12 
2:FORB=41T0163STEPa:A=INT( <X-15)/8)+l:C 
.INT((B-40)/S)+l 

167 IFP<A,C>=1THENP<A,C>=0:LINE(X+1,B+1 
)-<X+B,B+B>,l,BF:PRESET(A+17,C+17>,l:GO 
T0169 

16B P(A,C)=1:LINE(X+1,B+1)-<X+8,B+8>,14 
,BF:PRESET(A+17,C+17) ,15 
169 NEXTBiGOTOBB 
17B ' CTRL+O 

171 GrjSLB95:A)&"CTRL+0":G0SUBfc2:G03JB12 
2:FORB=16T013BSTEPB:A=INT( <Y-40)/B)+l=C 
=INT(<B-15)/B>+1 

172 IFP<C,A)=nHENP(C,A)=0:LINE(B+l,Y+l 
)-<8+8,Y+8) ,1,BF:PRESET<C+17,A+17) ,1:SD 
T0174 

173 P<C,A)«l:LINE(B+l,Y+l)-(B+a,Y+B),14 
,BF:PRESET(C+17,A+17) ,15 

174 NEXTBiGOTTJBB 

175 

176 ' ESTE PROGRAMA FOI DESENVOLVIDO 

177 ' POR ALEXANDRE CARDOSO DULLIUS, 

178 • EM DEZEMBRO DE 198B , NUM MICRO 

179 • EXPERT , ESPECIALMENTE PARA A 

180 ' REVISTA CPU 

181 ' 
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JANELAS EM SCREEN O 



RICARDO P. RYMSZA 



Já ficou provado que a utilização dc janelas, além de dar melhor apresentação aos programas ainda os lorna de mais fácil 
utilazaçâo. Porém, a programação de tais janelas era feita através do comando LINE, o que exigia que oprograma trabalhasse em SCREEN 
2, o que trazia um sério problema, que é a resolução de caracteres na tela. 

O programa que apresento a seguir gera janelas de tamanhos diversos e em SCREEN 0, aproveitando a resolução de 40x24 
caracteres, tendo possui duas variações dc janelas: uma em que a janela se sobrepõe a outra anterior e outra em que a janela aparece e 
desaparece, mantendo o texto anterior intacto. 

As linhas 500 a 580 salvam, a partir do endereço &H A0O0, a parte da tela que é apagada pela nova janela. Os caracteres s3o lidos 
diretamente da VRAM e escritos na RAM. 

As linhas 700 a 780 recolocam na VRAM a parte da tela que foi apagada pela janela. 

As linhas 1000 a 2050 geram as janelas definidas através dos números contidos nas variáveis X, Y, L e A. 

Encerro este artigo com esta breve explicação do programa, lembrando ao leitor que nenhum programa é absoluto e nenhum 
programador é perfeito. O leitor deve modificar estas rotinas conformeas suas necessidades, aumentando a sua velocidade e aperfeiçoando- 
o, pois este é o único e verdadeiro modo se aprender a lidar com qualquer linguagem, desde o Basic ao Assembler. Qualquer dúvida ou 
sugestão será bem recebida, bastando para tal entrar em contato com a revista CPU. 



1 ' Janelas i 

2 ' por Ricardo P. Rymsza 

3 ' Revista CPU 

4 ' 

10 CLS 

20 WIDTH40 

29 KEYOFF 

30 ' 

31 ■ X e Y sao as cmntenadas da janela 

32 'Lea largura da janela 

33 ' A e a altura da janela 

34 ' 

40 FLFW=1TDGO0:PRINT"*" ; :r>EXTW 
60 X=2:Y^2iL=15:A=10:GOSLB1000 

70 LDCATE3,3:PRINT "Esta rotina" 

71 LOCATE3, 4 :PRINT" permite a" 

72 UXATE3,5:PRIhn""criacao de" 

73 LOCATE3, 6 :PRINT" Janelas em" 

74 LOCATE3,7:PRINT"Screen 0. " 

75 LTXMTE3, 9 sPRINT "Tecle espaço" 
80 IFINKEY*=" "TVEhBB 

90 X=7:Y=5:L=15:A=10:GOSLB500:GDSLei000 
100 L0CA7EB,6:PRIMr ,, Cabe ; 
110 LrJCA7EB,7:PRINT''leitor, 
120 LDCATEB,8:PRIMr"feÍCDar esta" 
130 UDmTEB,9:WINT"rxrtina ou " 
140 LOCATEB, 10 :PRIWT" "criar novas." 
150 LOCATEB, 12: PRINTTecle espaço" 
155 IFIM<EY*=""TrEN155 

160 GOSLB700 : X=? : Y=l 5 : l_=34 : A=3 : GO9Jfcil00 
0 

170 LDCATE3, 16 iFRINT" Janelas v 1.2 por 
Ricardo Rymsza" 
190 GOTO 190 



Ricardo P. Rymsza, 15, cursa a 1 ! série do 2 o grau do Colégio 
Santo Inácio, programando em micros da linha MSX há 3 
anos, utilizando as linguagens Basic e Assembler. 



LA .MtOSOFl 

- ["OS MAGOS DO MSX"} - 



CONHEÇA NOSSA QUALIDADE IMPECÁVEL E A EXPERIÊNCIA DE 
QUEM LIDACOMMSX HA MAIS DE TRÊS ANOS. NOSSO ACERVO TEM 
CERCA DE 2100 TÍTULOS (MUÍTOS COM DOCUMENTAÇÃO]. E 
CRESCE SEMANALMENTE COM GRANDES NOVIDADES E PROMO- 
ÇÕES... VAMOS! SEJA MAIS UM DOS MAIS DE MIL FELIZES CLIENTES 
DO MAGO DO LAZZAROSOFT. 



JOGO 


NCZ$1,00 


APLICATIVO 


NCZ$2.00 


CP/M 


NCZ$4,00 


COPIADOR 


NCZ$4.00 


DISCO 


NCZ$2,00 
POSTAIS ' 


FITA 


NCZ$2.00 


DESPESAS 




NCZS0.00 



/tí> 



"MSXBOOK II (DICAS DE JOGOS) " * 
"EOTRONIC" 



•FLINTSTONES-TBIPLE COMMANDO-SOL NEGRO 1 & 2 
NAVYMOVIES.TERRA MEX-TUXY-TETRIS-WALL RUNNER-VECTOR 
MOON LANOING-ADDICTA BALL-NEO-2-DANGER MOUSE- 
PEBTER 8EARDLEVSFOOTBALL-OUEEN ll-D'JCKYS-FLICKY- 
SQUARE-RAMPART-CHUBBY CRISTLER-OPERATION WOLF. 
ASPAR-PITMAN-FINAL COUNTQOWN-RED OCTOBER ETC. " 



Seu ped.do pooo-â se- oagocoti vae sos'.al (AG Cem-s) o. ceque no- 
minal cruzado a Carlos H. B. Magalhães contendo um máximo de informa- 
ções sobre seu equipamento e um lelelone para eventual contaio. 



DESCONTÀO NO TOTAL: 10% 

TÁIOGO GRATir 

TE E A 



SOLICITE CATÁLOGO GRÁTIS 
NOVIDADE SEM PACOTE E AQUI 
ENTREGA EM 24 HORAS + CORREIO 



CAIXA POSTAL 19SS RIO DE JANEIRO RJ CEP:2O0O1 
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730 RE7LFN 


□W-l NDt-UlÊ* que 5âlVâ a parte da tela 


1000 ' 


502 ■ que sera preenchida com a janela. 


1001 ' Rotina que cria janelas em 

1002 ' screen 0 




1003 ' 


505 FORV^lTDfl 


1004 IF ( L+X ) >Jff 1 |-EM_^_— 1 : QL7TD1004 




1005 IF(A+Y>>23THENft=ft-l:GOTO 1005 


520 FCRF=1TQ_ 


1006 W=Y:T=1 :LDCATEX ,Y 


STD1 PTTfcf fni l ccri-' ítJ\ 
■^-*J n_».t l U J j vrttl, (.KJ 


1010 FRINT"+"; 


540 00+-1:R=R+1 


1020 FDRV=1TCL— 2 




1030 PRINT"-" ; :NEXTV 


saci fcfaJJ* aa 


1040 FRINT"+" 


570 f^EXTV 


1045 T=T+1 


590 RETLPN 


1050 lFT=A"n-EhC000 




1060 L0DATEX,UH-1 


/iol rtotina que retorna a parte da te — 


1070 PRINT" ! 


wc? gi ip foi preenchida c/ a j anel a 


10B0 F0RR=X+1TD(X+(L— 1) )— 1 :LDQft7ER,W*-l : 




PR1MT" M ;:I\EX7R 




110B LDCATERjUM-lsPRINT" ! " 


705 FORV=lTDA 


1110 T=T+1 : W=W+1 : (30701050 


710 R=N 


2000 LDCATEX,Y+{A-1) 


720 FCFF=i Tl. 1. 


2010 PRINT"+" ; 


/ o*fj vrLf,£ ^ r\ / ■ rrLF% \\-t t 


2020 F0RV=17O_-2 


740 (3mH"l : R=R+1 


2030 FRINT"-" ; :|\EXTV 




2040 FRINT"+" 




2050 ROURN 


770 MDCTV 





PARA TAL, ESTOU ENVIANDO CHEQUE NOMINAL 
A ÁGUIA INFORMÁTICA, OU VALE POSTAL 
(PAGÁVEL NA AGÊNCIA COPACABANA), NO 
VALOR DE NCz$ 7,00 (SETE CRUZADOS NOVOS). 

FAÇA A SUA ASSINATURA E CONCORRA AO 
SORTEIO DE PROGRAMAS DA PAULl SOFT. 
( EDTRONIC - SPRITE MAKER - MSX TURBO - 
FASTCOPY) 



NOME: 

ENDEREÇO : 

BAIRRO: CEP : 

CIDADE: ESTADO: 

DADOS DO EQUIPAMENTO : 
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PARA TAL, ESTOU ENVIANDO CHEQUE NOMINAL 
A ÁGUIA INFORMÁTICA, OU VALE POSTAL 
(PAGÁVEL NA AGÊNCIA COPACABANA), NO 
VALOR DE NCz$ 7,00 (SETE CRUZADOS NOVOS). 

FAÇA A SUA ASSINATURA E CONCORRA AO 
SORTEIO DE PROGRAMAS DA PAULl SOFT. 
( EDTRONIC • SPRITE MAKER - MSX TURBO - 
FAST COPY ) 



NOME: 

ENDEREÇO : 

BAIRRO : CEP : 

CIDADE: ESTADO: 

DADOS DO EQUIPAMENTO : 



AOLTA informática 



AGU1A INFORMÁTICA 



MSX E dBASE II, 

A CAMINHO DE SUA EMPRESA 



DINO POLLETO 




Nos últimos anos, conversas sobre mi- 
crocomputadores, informatização e software 
têm se tornado comuns. Quem não souber abso- 
lutamente nada sobre o assunto corre o risco de 
ficar apenas ouvindo, ouvindo. Quem sabe, 
envergonhado. 

Se o ouvinte é um empresário, então o 
constrangimento pode ser maior porque onde já 
se viu um empresário que não sabe falar de 
computador, se até crianças e jovens andam 
falando disso! 

Mas, a verdade é que qualquer pessoa estará sendo injusta 
consigo mesma se considerar-se "ignorante" em computação. Afi- 
nal, quem fica envergonhado por não saber nada sobre geladeiras 
além, é claro, de abrir a porta e apanhar uma cerveja geladinha, ou 
por não saber nada sobre mecânica de automóveis? 

Do mesmo modo, ninguém deveria se esconder cada vez 
que começasse a ouvir falar em teclados, micros, drives, modens, 
softwares, etc. 

O que fazer? 

No mundo empresarial, banco de dados, processadores de 
texto, planilhas eletrônicas e geradores gráficos estão entre as 
ferramentas de produtividade mais necessárias e mais procuradas. 



Chamamos a isso de software de produ- 
tividade porque são ferramentas que melhoram 
nossa produção porfissional. 

No caso de empresas, dados são impor- 
tantes quando se quer fazer algum diagnóstico, 
quando se quer saber alguma coisa, quando se 
quer tomar uma decisão. 

Nestes tempos de concorrência feroz, a 
correia administração das atividades (produção, 
recebimento dc dinheiro e pagamento de 
ibrigações) é mais do que vital. 
Quem tem suas informações sobre custo anotadas em 
algum lugar consegue fazer o orçamento mais rápido que a 
concorrência. Quem sabe quanto vai ter que pagar no fim do mês 
pede mais cedo o desconto de duplicatas ou empréstimo para capital 
de giro. Quem sabe qual o bancoque tem mais duplicatas para cobrar 
sabe atrás de qual gerente correr na hora do aperto. 

Quando sc fala em gerenciador de banco de dados é preciso 
ter em mente três coisas: 

• o sistema armazena informações? 

- ele modifica as informações quando você decide? 

- o sistema recupera essas informações quando você decide? 
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Numa analogia simples, um Sistema que armazena 
informações pode ser: uma secretária, um bloco de fichas em 
branco, um lápis, um arquivo de gavetas, uma lira de etiquetas 
adesivas. 

A parte que modifica as informações fica sendo: uma 
secretária, um lápis, uma borracha, cola. 

E o sistema que recupera informações fica assim: uma 
secretária paciente, rápida, confiável, que não falte, que nâo perca a 
chave do arquivo, resistente, corajosa. 

Pois é, se você descobrir uma secretária que seja tudo isso,ela 
vale seu peso em ouro. Ponha-a no seguro. Vale mesmo. 

Mas ela nunca será um computador. Resistente, incansável, 
rápido, confiável e que usando um gerenciador de banco de dados, 
como o dB ASE II, faz infinitamente mais do que o sistema descrito 
acima. 

Os pequenos e médios empresários precisam que a 
informática lhes proporcione benefícios imediatos a ao menor custo 
possível. Assim, é provável que sua empresa não precise de um 
IBM-PC, pelo menos por enquanto. De qualquer modo, é preciso 
somar os preços de hardware, software e acessórios, além de avaliar 
o custo/benefício. 

Enfim, o dinheiro a ser empregado vai realmente melhorar 
os serviços, agilizar as decisões? 

Lembre-se que um compulador mal adaptado às necessi- 
dades ou ao porte de sua empresa nâo presta serviço nenhum, só 
atrapalha. E um software sem recursos, ou de recursos escassos nâo 
resolve nenhum problema, ao contrário. 

À primeira vista pode parecer que se trataapenas de procurar 
uma boa empresa de informática e comprar os equipamentos 
necessários. Na maioria dos casos, o interessado encontra uma das 
muitas lojas que existem nas grandes cidades e pede orientação, 
sendo que nem sempre consegue o que precisa. 



Caso encontre algum programa que pareça interessante, 
deve pedir para vê-lo em funcionamento, experimentá-lo, ser exi- 
gente. 

Se precisar de alguma característica e alguém reponder rapi- 
damente que não dá, é bom desconfiar. Geralmente dá, mas a pes- 
soa é que não sabe como fazer e não quer confessar. 

Faça o seu papel de consumidor. Afina! de contas, o dinheiro 

é seu. 

É bom lembrar que, por mais que se multipliquem as escolas 
que ensinam as linguagens BASIC e COBOL, a programação de 
computadores sempre será uma atividade de especialistas que 
passam dias, semanas, meses, tentando montar grandes quebra- 
cabeças. 

Trata-se de uma atividade que consome muito tempo, exige 
dedicação de aprendizado, técnica em constante aperfeiçoamento e 
um conhecimento profundo de lógica e das linguagens com as quais 
se trabalha. 

Quanto ao Basic, uma linguagem inventada em 1964, está 
bem longe das necessidades de hoje. 
Mas e agora? 

Você já optou pelo poderoso hardware MSX. Se na sua 
configuração tiver pelo menos um disk drive c meio caminho 
andado. É só adquirir o software. 

Valeapena lembrar aimportância da compatibilidade do seu 
software para MSX com um software para IBM-PC, pois isto facili- 
tará a migração futura, se necessário, dos seus arquivos e da própria 
cultura do software. 

Um exemplo é o dB ASE II Plus MSX, que vem a ser o único 
gerenciador de banco de dados do mercado c que já facilitou e 
agilizou a vida de muitas empresas e que merece uma atenção 
especial na hora de se montar um sistema que exige a manipulação 
de dados. 



O MULTIMODEM LIGA VOCÊ AO MUNDO 

Sen Mir.RnrriMDll t h nnu • í£ . j :_x 3- i -i. t j _ 



Seu MICROCOMPUTADOR 
o que podia? 

Volte a ativa com o MULTIMODEM DA 
TELCOM, que lhe deixa na ponta dos dedos o 
Brasil e o mundo. Você tem acesso a bancos de 
dados como: CIRANDÂO, BIREME, RENPAC, 
SAMPA, VIDEOTEXTO, entre outros, através 
de ligações a grandes sistemas de computadores 
que também lhe proporcionam, troca de infor- 
mações, programas e jogos. 

Você sai do isolamento, ganha novos 
amigos e ainda tem à mão o melhor da 
TELEINFORMÁTICA. 

O MULTIMODEM agora tem Discagem 
Automática (dispensa o uso do aparelho telefónico) 



TELCOM INFORMÁTICA LTDA. 

RuaAniia Garibaldi, 1.700 
CEP 90430 - 
PORTO ALEGRE -RS 
Telelone- (0512)41-9871 



está desinformado, com cara de quem já fez tudo 



MSX SOFT INFORMÁTICA (RJ) 
Fone; 10211 2340775 

Nana Computadores (SP) Fone (011) 9142266 
The Lucky Man (BA) Fone (071) 3595599 
Pratica Proj. e Assist. Téo. Lida. (SC) Fone 
[0482) 220819 

e tojas especializadas em MSX 
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Desejo corresponder-me com pessoas interessadas em trocar dicas 
e macetes de programação em Basic, Assembler e, principalmente, 
sobre "C". 

ALEXANDRE CARDOSO DULLIUS 
RUA LINDOLFO COLLOR 111 
CENTRO 

93800 - SAPIRANGA - RS 



... Aproveito a oportunidade para desejar-lhes muito sucesso 
com a revista "CPU", de excelente qualidade, feita por pessoas que 
conhecem o equipamento e que se propõem a escrever. 

Como usuário do MSX, gostaria que, se possível, me fossem 
esclarecidas algumas dúvidas. 

Possuo um drive Microsol DRX 360 com interface CDX2 

- É possível retirar a fonte, colocando-a separada, pois seu 
aquecimento é excessivo? 

- A ligação da interface é algo assim escabroso, pois a mes- 
ma nao tem saída na caixa do drive, ficando o cabo dobra- 
do com saída lateral ou reto passando por cima da fonte e 
correndo o risco de ser cortado pela caixa. Será que liguei 
errado? 

- O comando VERIFY ON/OFF está sempre ativado ou tem 
que ser reativado a cada operação? 

- É possível a instalação de um led para saber quando está 
ligada? 

Meu equipamento é o seguinte: Micra Hot Bit - Drive DRX 
360 DD e Interface CDX 2 

Sem mais para o momento, agradeço pela atenção dispen- 
sada e subscrevo-me, 

SÉRGIO LUIZ RUIZ SOLER 
RUA DO CORTUME 625 BL C 4 
ÁGUA BRANCA 
05065 - SÃO PAULO - SP 

Enviamos sua correspondência à Microsol que nos enviou a 
seguinte resposla: 

Com relação à carta acima cilada, informamos que: 

Realmente, este aquecimento não é característico da fonte. 
Caso seja do seu interesse, V. Sa. poderá enviá-la para manutenção, 
sem quaisquer ónus. Somente as despesas de frete serão de sua 
responsabilidade. 

A ligaçãodocaborequeraabertura do gabinete. Essa foi uma 
medida encontrada para que o preço fosse mais acessível. En- 
tretanto, o drive possui uma depressão entre o gabinete eo acionador 
que permite a passagem do cabo, sem maiores problemas. 

O comando verify encontra-se na página 99, do livro Sistema 
de Disco para MSX, que segue em anexo, para maiores esclareci- 
mentos. 

Cordialmente, 
NAGILA LOPES 
DEPTO DE COMUNICAÇÃO 
MICROSOL TECNOLOGIA LTDA. 
RUA ALMIRANTE RUFINO 779 
VILA UNIÃO 
60420 - FORTALEZA - CE 



Quanto às várias dúvidas de vossos leitores sobre a 
transformação do MSX 2, repasso aqui respostas a todas ascartas de 
uma só vez, mas sem responder a uma de cada vez, já que são muitas 
cartas e muitas dúvidas. Acredito que assim, poderão poder dar um 
atendimento maior a lodos os vossos leitores de uma só vez. 
Preço da transformação: US$ 400 
Preço do cartucho MegaRAM: USS 200 
Prazo de enirega: +/- 30 dias 
Prazo de garantia: 90 dias 

Várias outrasdúvidas não me senti capacitado em responder, 
já que se tratam de consultas que, a meu ver, devem ser feitas di- 
retamente e particularmente ao Ademir, tais como: preços de 
serviços especiais, se 6 possível viajar até São Paulo chegando pela 
manhã e levando o micro de tarde, etc, ele. 

PEDRO HENRIQUE GAMA 
CAIXA POSTAL 94368 
25800 TRÊS RIOS - RJ 



Possuo um MSX há algum tempo e, lendo um exemplar da 
revista CPU de número 3 achei, de muilo boa qualidade os assuntos, 
artigos e programas publicados. Só fiquei um pouco decepcionado 
de não encontrar a seção de dicas de mil vidas na revista de número 
5 e acho que não fui só eu que fiquei assim. 

Se possível, gostaria de sugerir que fossem publicados 
comentários, mapas, dicas, macetes e truques de jogos, para que o 
usuário consiga concluir o jogo. A meu ver, os leitores não se 
interessam só por programas complexos. Existem os aficionados 
por jogos e tenho certeza que não são poucos. Com esse espaço a 
revista só tem a ganhar. 

Gostaria de saber se há condições de receber as revistas de 
número 1 e 2 pelo correio, para que a minha coleçào fique completa. 

Deixando um forte abraço, desejo-lhes um Ano Novo com 
muito sucesso. 

SÉRGIO LUIS CESAR 

BECO AUGUSTO DOS ANJOS 25 

21710 - PADRE MIGUEL - RJ , 



Realmente você tem razão. No número 5 nos discuidamos 
um pouco com a parte de jogos, principalmente no que se refere a 
seção de dicas de mil vidas. Não acreditávamos que esta seção 
estivesse fazendo lanto sucesso. Estamos incrementando a parte de 
jogos e já neste número poderá ser notada a diferença. 

Com relação aos números atrasados, informamos que o 
número 2 encontra-se esgotado. O número 1 poderá ser solicitado 
pelo correio, assim como os demais, mediante o envio de cheque 
nominal, ou vale postal, pagável á agência Copacabana, no valor do 
custo do número que se encontra nas bancas. 



PAY LOAD 



PA Y LOAD é um jogo sensacional, onde você tem que dirigir um LUIZ FERNANDO FIACORDI 

caminhão pelas estradas do Japão . Neste artigo, fornecemos os PAVLISOFT INFORMÁTICA 

comandos do jogo e alguns macetes que irão torná-lo um 
excelente motorista. 



- Para iniciar, pressione a tecla F2. 

- Para movimentar o caminhão pelas ruas, pressione as setas direita e esquerda ou use o joystick. 

- Para acelerar, pressione a barra de espaço ou o botão do joystick. 

- Para brecar, pressione shift ou graph ou code ou caps ou ainda o botão do joystick. 

- Para mudar as marchas, pressione as selas para cima e baixo ou joystick. 

- Para gravar ou carregar, presione STOP, ou seja, quando você já estiver cansado de jogar, mas quiser continuar outra hora do mesrm 
lugar que parou, basta pressionar STOP, escolher a opção SAVE e pressionar a barra de cspaços>. 

- Agora, se você quiser carregar o jogo do lugar que parou, proceda da mesma forma. Somente pressione STOP após começar o jogo. 
Escolha a opção LOAD c pressione barra de espaço. Nao se esqueça de pressionar a tecla PLAY do gravador. 
Obs: Os comandos SAVE e LOAD, mencionados anteriormente, só podem ser utilizados para gravar em fita cassete. 
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COMANDOS 



1 - INFORMATION BOARD (informação de bordo) 

Aparece escrito os vários tipos de informações que irão lhe 
interessar, como, por exemplo, por que motivo e quanto dinheiro 
perdeu ao ser multado. 
2 -FATIGUE (cansaço) 

Indica o nível de cansaço do motorista. Quando essa porcen- 
tagem ultrapassar 100%, procure um DRIVE-IN. Chegando lá, 
estacione seu caminhão em cima da faixa escrita TTC. Compre um 
"ME AL" (refeição) e um "COFFEE" (café). Caso você não proceda 
desta forma, o motorista ficará tão cansado que não conseguirá 
dirigir direito, ou seja, não vai obedecer aos seus comandos. 

3 - LP (número de inrrações que se pode cometer) 

Inicialmente, você começa com 15 e, conforme for multado, 
batendo, o número irá abaixando. Caso chegue a zero, sua licença 
será cancelada. 

4 - POINT (Pontos) 

Indicao número de pontos que você tem. No início, você começa 
com 20 mil pontos. Esses pontos servem para você comprar comida, 
combustível, peças para o caminhão, etc. 

5 - FUEL (Combustível) 

Indicador de combustível. Caso a faixa vermelha chegue ao fim, 
o jogo acabará por falta de combustível. Para encher o tanque, 
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proceda da seguinte forma: procure um posto de gasolina (de 
preferência nas cidades, pois no campo não há posto), estacione em 
cima da faixa onde está escrito TTC. O tanque será n 
bastando, para isso, que você não saia d' 
seus pontos estiverem sendo desce 
abastecido. 

6 - TIME/LIMIT (tempo limite) 

Existem dois relógios marcando as horas. O relógio s 
marca as horas do dia, sendo que, inicialmente, mostrará 8 horas da 
manhã. Quando chegar às 19 horas, escurece, só amanhecendo 
novamente as 6 horas da manha. O relógio inferior indica o tempo 
que lhe falta para entregar o carregamento. Portanto, não se atrase, 
pois caso isto aconteça, será descontado do seu pagamento. 
7 -SPEED (velocidade) 

Indica a velocidade do caminhão. 

8 - TRIP (giro) 

Indica os quilómetros rodados pelo caminhão. 

9 - RND (marchas) 

R para ré, N para neutro, e D para a frente. 

10 - MAPA DO JAPÃO 

O ponto branco indica a sua localização. Caso aceite algum em- 
prego, aparecerá um ponto vermelho, que será o seu destino. 



FICHA DE TRABALHO 

1 1 Current Location: Hokkaido 

12 Assignmet: Hokkaido Nigata 
13Load: Cow 

14 LoadWight: 0047t 

15 Delivery Time Limit: 05' 48" 
16Distance: 1300 Km 
17Paymene 13160 pts 

18 Accept? YES NO 

A ficha de trabalho é obtida no "WORK" de cada cidade, rural 
ou urbana. 

11 - CURRENT LOCATION (local atual) 

Indica em que lugar você está. De acordo com o exemplo acima, 
você está em Hokkaido. 

12 - ASSIGNMENT (destino) 

Indica a cidade que você está e a seguir o seu destino, ou seja, o 
lugar para onde deve levar o carregamento. 

13 - LOAD (carga) 

Indica o que você irá carregar. De acordo com o exemplo, você 
levará uma carga de vacas. 

14 - LOAD WEIGHT (peso da carga) 

Indica o peso do carregamento. Cuidado, pois quando o peso 
exceder, você poderá tomar uma ou várias multas. 

15 - DELIVERY TIME LIMIT (tempo limite de entrega) 
Indica o tempo que você tem para chegar ao seu destino com a 

carga. 

16 - DISTANCE (distância) 

Indica a distância do lugar atual até o destino desejado. 

17 - PAYMENT (pagamento) 

Indica quanto você ganhará com essa encomenda. É o mais 
importante de todos. Por isso, não se preocupe com carregamentos 
de baixo pagamento, pois a viagem poderá sair mais cara do que 
você pensa. 

18 - ACCEPT (aceite) 

Se você aceitar o emprego, ponha a mãozinha no YES, caso 
contrário, ponha no NO. Não se esqueça de, após escolher sua 
opção, pressionar a bana de espaços. 

TIPOS DE MULTAS 

- Ultrapassar o sinal vermelho 

- Ultrapassar o limite de velocidade 

- Ultrapassr o limite de carga 

- Advertência 

- Dirigir bêbado 

- Dirigir na contra-mão 

Os dois últimos tipos de multa são os piores, pois sua carteira de 
motorista será apreendida, dando fim ao jogo. Os policiais que lhe 
poderão aplicar essas multas usam carros brancos, sendo que 
também existem radares espalhados pelas ruas das cidades. 
HIGHWAY (RODOVIAS) 

Servem para que você chegue mais rápido aos lugares. Você 
poderá pegar uma rodovia de Hokkaido e poderá ir para Aomori, 
Miyagi, Tochigi, Tokyo, Shizuoka, Aichi, Oosaka, Hiroshima, 
Fukuoka ou vice-versa. Para tal, você terá que pagar um pedágio, 
referente à rodovia que escolher. 

Nas rodovias será sempre claro, ou seja, nunca haverá noite. 
WORK (TRABALHO) 

Quando você quiser um emprego, basta encontrar um WORK, 
estacionar na faixa TTC. Aparecerá uma ficha, com todos os 
detalhes . Para aceitar uma encomenda, basta escolher o YES e partir 
para o local determinado. Assim que você chegar no local deter- 
minado, leve o carregamento até o WORK. 



GS (POSTO DE GASOLINA) 
Para encher o tanque, basta posicionar o caminhão em cima da 
faixa escrita TTC. 

Não existem postos de gasolina nas cidades rurais. 
DRIVE-IN 

Pare em cima da faixa TTC. Aparecerá um MENU de opções, 
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1000 pis 
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MEAL 


2000 pts 
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500 pts 




22 


EXIT 





19 - BEER (cerveja) 

De vez em quando, é sempre bom tomar uma lourinha. Mas 
tome cuidado para não dirigir bêbado, pois sua licença poderá ser 
cancelada. 

20 - MEAL (refeição) 

Como você viaja o dia inteiro e nunca pára, o motorista sente 
fome. Portanto, se você não alimentá-lo direito, ele ficará tão 
cansado que não obedecerá a seus comandos. 
Obs: O cansaço do motorista é medido pelo FATIGUE. 
21-COFFEE (café) 

É muito bom durante a noite, mas também não podemos dis- 
pensá-lo durante o dia. 

Obs: Tome sempre um caféapós as refeições. Com isso, o indicador 
de FATIGUE aumentará lentamente. 
22 • Exit (saída) 

Volta ao jogo. 
PARTS TUNE (OFICINA MECÂNICA) 

Pare em cimada faixa TTC. Aparecerá um menu de opções, com 
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23 - GASTANK (tanque reserva de combustível) 

É de grande utilidade, pois assim você não se preocupa tanto em 
ficar enchendo o tanque. CadaGASTANK custa 10000 pts. Dá para 
comprar até 2 tanques de reserva. 

24 - TURBO (turbo) 

Também é de grande utilidade, pois aumenta sua velocidade. 
Cada TURBO custa 100000 pts. Podem ser comprados até 2 turbos. 

25 - RADIO (rádio) 

Não tem muita utilidade. Para fazer funcionar o rádio, pressione 
a letra "T". Cada rádio custa 30Q00 pts, sendo que somente um pode 
ser comprado. 

26 - RADER (radar) 

Protege seu caminhão de quase todos os radares. Apenas um 
pode ser comprado. 

27 - LIGHT (luz) 

De grande utilidade durante a noite, aumentando sua visão, po- 
dendo ser comprado um farol por vez. 

28 - EXIT (saída) 

Obs: Você está sujeito, a qualquer hora do jogo, a perder alguma 
dessas peças. 



Luiz Fernando Fiacordi, 16, cursa o 3 a colegial em São Paulo, 
com curso de basic e Inglês, trabalhando, atualmente, com 
entusiasmo, na Paulisoft. 

CPU 43 



PAY LOAD ESTRADAS DO JAPÃO 

SHIMANE TOTTORlT 




NAGASAKI KAGOSHIMA MIYAZAKI 



TABELA DE PREÇOS DAS EST| 



HOKKAIDO 
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4800 
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3600 
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600 
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2400 


3000 


FUKUOKA 


SAÍDA 


600 


1200 
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RADAS 
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FAST! COPY COPIADOR ULTRA-RÁPIDO 
DE DISCOS 
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fiador de discos: ultra -rápido 
■a controladoras padrão MioroSc 
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O usuário de MSX com um drive sofre alguns problemas para 
produzir cópias de seus programas, principalmente quando seus 
discos estão cheios, pois o tempo gasto e o número de trocas 
necessárias desanimam qualquer um. Sem dúvida, o comando do 
sistema operacional mais utilizado depois do DIR é o COPY *.* e 
o usuário sabe bem como sofre com esse comando, até sonhando 
com a oportunidade de, um dia, comprar um segundo drive, dia este 
que, para muitos, dificilmente chegará. 

A PAULISOFT Informática, dentro de uma nova filosofia de 
incentivo ao software original e nacional, como demonstrou com o 
lançamento do EDTRONIC e do SPRITE MAKER, está lançando 
agora o FAST! COPY, de autoria de Gilberto Moreira Martins c 
Rubens Henrique Kiihl Jr., que vem para auxiliar o usuárioa agilizar 
suascópias. Como o nome deixa claro, e o subtítulo "copiador ultra- 
rápido" enfatiza, este utilitário nada mais é do que um copiador de 
setores como os muitos que já existem, só que extremamente rápido 
e necessitando um número muito menor de trocas de discos. 

O programa é distribuído somente em disco, uma vez que o 
mesmo foi produzido para ser executado a partir do sistema opera- 
cional, bastando digitar FAST1 COPY na linha de comando. Apesar 
da facilidade de uso e de todos os comandos serem complementa- 
dos por mensagens explicativas, o programa vem acompanhado por 
um manual ilustrado e simples. Contém algumas informações 
técnicas muito boas a respeito do programa, como o fato dele 
armazenar parte dos dados lidos do disco, durante a cópia, na 
VRAM, utilizando praticamente toda a memória do micro. Desta 
forma, ele consegue realizar uma cópia com apenas 9 trocas de 
discos, enquanto que os programas concorrentes mais próximos 
necessitam de 16. 

Sua apresentação gráfica lembra um pouco o LOCKSMITH do 
Apple, onde um cursor vai varrendo uma região da tela conforme as 
trilhas e os lados vão sendo lidos ou gravados, permitindo que o 
usuário possa monitorar sua cópia. Possui boas indicações de erros 
de leitura ou de gravação, além de avisar se o disco está com selo de 
proteção impedindo a gravação, acompanhados sempre de "beeps" 
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de tons diferentes. Possui também o recurso da tecla ESC, que 
permite interromper a leitura ou gravação a qualquer momento. 
Interessante é o reconhecimento dos drives pelo próprio programa, 
só admitindo drives fisicamente conectados ao micro e n3o apresen- 
tando mensagens do tipo "insira disquete como drive B:". 

O programa também apresenia algumas restrições, como exigir 
que o disco destino esteja previamente formatado e numa 
formatação padrão. Nada de discos travados. Essas restrições são 
normais e também estão presentes em outros programas do género. 
Porém, existe uma restrição mais importante, que limita o número 
de usuários deste programa, que é o fato de só funcionar em 
controladoras do padrão Microsol, de forma que os usuários de 
controladoras da Sharp e de 3 1/2" lerão de aguardar novas versões 
que eslão sendo prometidas. 

A seguir temos um gráfico comparativo do tempo de cópia de 
diversos programas similares existentes no mercado, tanto para 
MSX como para PC, sendo que estes últimos podem ser usados por 
quem tem acesso ao PC. Para MSX foram testados todos os pro- 
gramas conhecidos que realizam a cópia de forma semelhante, tanto 
para um drive quanto para dois. Um detalhe a ser observado é que 
para obtenção do tempo para um drive tentamos eliminar o fato do 
tempo de troca do disco ser diferente de usuário para usuário. Para 
isso, ao executarmos o teste, não trocamos o disco quando era 
pedido, mas simplesmente respondíamos ao pedido, eliminando, 
assim, o tempo gasto com a troca. No final, foi computado o número 
de trocas necessárias e acrescido ao tempo de cópia o tempo de 7 
segundos por troca, que, segundo nossos cálculos, seria o tempo 
médio estimado para uma troca normal de discos. 

A partir deste gráfico, podemos tirar as seguintes conclusões: 

a) O FAST! COPY com um drive é 4 vezes mais rápido que o 

segundo colocado na linha MSX e 7 vezes mais rápido que 
o mesmo programa com dois drives. 

b) O número de cópias é quase a metade das exigidas pelo 
segundo colocado (15 contra 9). 

c) O FAST! COPY, rodando num MSX com 64Kb de RAM e 16 



Kb de VRAM.com um clock de 3,58 MHZ é cerca de 1 ,5 
vezes mais rápido do que os programas que rodam em PC 
com 256 Kb de RAM e clock de 4,77 MHZ. 

d) Somente o DISKCOPY do PC com 1 drive consegue ser mais 
rápido que o FASTCOPY, mesmo assim em apenas 7 segun- 
dos. 

e) Pela diferença entre o tempo gasto para cópia com 1 e com 2 
drives, conclui-se que se perde mais tempo na troca de disco 
num sistema de apenas um drive do que com a cópia propria- 
mente. 

f) A única vantagem verificada nos outros programas semelhan- 
tes testados, com excessão do PRO KIT ZAPPER, é o fato de 
funcionarem com outras controladoras. 

Muitos têm dito que programas como o FASTICOPY são 
incentivadores da pirataria, por permitirem a cópiade programas de 



forma indiscriminada. Porém, deve ficar claro que o FASTICOPY 
nâo faz nada a mais do que os outros copiadores de setores não 
façam, apenas agilizando o trabalho e, como todos os outros, seu 
objetivo é de auxiliar o usuário a poder manter cópias de segurança 
de seus discos, protegendo-os dos imprevistos que rodeiamo mundo 
da informática e que sua utilização paraa produção de cópias ilícitas 
é de responsabilidade de cada usuário. 
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Tabela Comparativa de Tempo de Cópia 
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* PX XT 4.77 MhZ 256 kb PC-DOS 2.1 NT=Número de trocas. RV=Relação de 
velocidade. Tempo médio de 7 s. para cada troca. 






ONDE É POSSÍVEL ENCONTRAR TUDO PARA SEU 
MSX- 1 , MSX- 2 E MEGA RAM. 



„_ ' TEMOS ASSISTÊNCIA TÉCNICA PRÓPRIA. 

E UMA SUPER LOJA ONDE VOCÊ ENCONTRA TUDCOQUÉ QUIZER PARA SEU MSX. 
TAMBÉM TEMOS UMA SUPER SOFTHOUSE COM GRANDE QUANTIDADE DE JOGOS E APLICATIVOS. 
ATUAMOS TAMBÉM NA ÁREA PROFISSIONAL (DESENVOLVIMENTO DE SISTEMAS), 
TEMOS UMA EQUIPE JOVEM A SUA DISPOSIÇÃO PARA DAR ACESSÓRIA QUE VOCÊ MERECE. 
AGORA QUE VOCÊ JA CONHECE UM POUCO DO NOSSO SISTEMA. ASSOCIE -SE AO CLUBE DO "MSX' ENTRANDO 
EM CONTATO CONOSCO PELO FONE (01 1 1 436-0331. RUA RANGEL PESTANA. 950, CEP 13?O0, JUNDIAI, SP 
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SISTEMA OPERACIONAL BKP DISCO 
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A grande maioria dos usuários da linha MSX que tra- 
balhou ou trabalha com fita cassete, já utilizou o programa BKP, que 
vem a ser uma ferramenta que permite ao usuário efetuar cópias dc 
segurança dos programas gravados em fita, mesmo que origi- 
nalmente eles tenham sido gravados com proteção. 

Na época do lançamento do BKP para fita, não existia no 
Brasil uma lei que regulamentasse a produção e venda de software 
para computador e o BKP foi vendido livremente, tendo sido, com 
certeza, um dos campeões de venda algum lempo atrás. 

Mesmo sem ter tido o seu trabalho recompensado, o autor 
do BKP lançou a versão deste programa para disco e deixou a cargo 
da Paulisoft, sofehouse de São Paulo que comercializa, entre outros 
títulos, o Edtronic e o MSX Turbo a venda do Sistema Operacional 
BKP de Disco, que também poderá ser encontrado em outras 
SOFTHOUSES, a exemplo do que acontece com todos os produtos 
da PAULISOFT. 

Mas o que vem a ser o Sistema Operacional BKP Disco? 

O BKP Disco é um 
sofisticado sistema de cópia 
e edição, formado de 12 
comandos que permitem ao 
usuário trabalhar com a 
unidade disco de uma forma 
mais fácil e segura. 

Os 12 comandos 
do BKP Disco permitem 
produzir cópias de 
segurança de discos, mesmo 
que estes possuam proteção 
contra cópia, manter um ar- 
quivo de programas, ou seja, 
uma lista geral de todos os 
programas ou arquivos que 



o usuário possua, facilitando, desta forma, a sua localização, cópia 
ou edição, ordenar o diretório, restaurar um arquivo que tenha sido 
apagado acidentalemnte ou que tenha tido algum problema na 
gravação, efetuar pequenas alterações em arquivos, possuindo, 
portanto, a função Zapper e diversas outras. 

O programa é composto de um programa principal 
(BKP.COM), que tem a fuiiçjto de carregar e executar os demais 
módulos que compõem o menu principal. 

O BKP disco possui três tabelas de caracteres, sendo que 
o usuário deverá selecionar uma delas, dependendo do computador 
e versão utilizados (Expert 1 . 1 ou 1 .0 e Hotbit), permitindo também 
a operação com cartão de 80 colunas. 

O manual que acompanha o soft é bastante detalhado, não 
deixando o usuário com dúvidas sobre a operação do programa, 
tendo tabela de mensagens de erro e um glossário de U 
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Detalhe do mapa do disoo. 



Conclusão: 

OSistema Operacional BKP 
de Disco apresenta inúmeras 
vantagens, tanto para os 
usuários de nível mais 
avançado como para aqueles 
que não irão utilizar todas as 
suas facilidades, como a de 
alterar arquivos gravados no 
disco. Uma vez que o usuário 
comece a trabalhar com o 
programa, absorvendo todos 
os seus comandos e maneira 
de trabalhar, ficará difícil 
operar com outros sistemas 
mais lentos e, de certa forma, 
mais complicados. 




END.: 

CEP: CIDADE: " F: • 

TEL ( ) MICRO(S) QUE POSSUI: •• 




A MELHOR E MAIS BEM APARELHADA SOFTHOUSE DO RIO DE JANEIRO, 
AGORA EM NOVAS INSTALAÇÕES, COLOCA A SUA DISPOSIÇÃO 
A MAIS COMPLETA LINHA DE PRODUTOS PARA O SEU MSX! 



VOCESO TEM A GANHAR 




0 SÃO MAIS DE 2.000 PROGRAMAS A SUA DISPOSIÇÃO. COM GRAVAÇÃO 
PROFISSIONAL GARANTIDA, 
° DRIVES, INTERFACES, EXPANSORES. PLACAS, MODEMS, GABINETES. ETC, 
° LIVROS E REVISTAS ESPECIALIZADOS, 

E MAIS ! 

AGORA VOCÊ CONTARÁ TAMBÉM COM A EXCLUSIVIDADE DO .. 
NEWSOFT INFOCARD, 
O CARTÃO QUE ESTÁ REVOLUCIONANDO O 
MERCADO DE INFORMÁTICA ! 
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NÃO PERCA TEMPO I ★ INFORMÁTICA * \ 

Visite SHOW ROOM na Av. NILO PEÇANHA n s 50 sala 906. 
Ed.Rodolfo de Paoli, CEP 20020. bem no centro do RIO (Largo da Carioca) 



